Получить имя файла из read.csv (file.choose ())

Question

Мне интересно, можно ли извлечь имя файла из команды file.choose (), встроенной в вызов read.csv.Сейчас я делаю это в два этапа, но пользователь должен выбрать один и тот же файл дважды, чтобы извлечь как данные (csv), так и имя файла для использования в функции, которую я запускаю.Я хочу сделать так, чтобы пользователь мог выбрать файл только один раз, и тогда я смогу использовать как данные, так и имя файла.

Вот что я работаю:

data <- read.csv(file.choose(), skip=1))
name <- basename(file.choose())

Я использую OS X, если это помогает, так как я думаю, что file.choose () ведет себя по-разному в зависимости от ОС.Заранее спасибо.

Answer 1

Почему вы используете встроенную команду file.choose()?

filename <- file.choose()
data <- read.csv(filename, skip=1)
name <- basename(filename)

Answer 2

используйте это:

df = read.csv(file.choose(), sep = "<use relevant seperator>", header = T, quote = "")

разделители, как правило, запятые , или точка полного останова .

Пример:

df = read.csv(file.choose(), sep = ",", header = T, quote = "")

#

Использование:

df = df[,!apply(is.na(df), 2, all)] # works for every data format
to remove blank columns to the left