从read.csv获取文件名（file.choose（））

Question

我想知道是否可以从read.csv调用中嵌入的file.choose（）命令中抽出文件名。现在我分两步执行此操作，但用户必须选择相同的文件两次才能提取数据（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 = "")

分隔符通常为逗号,或fullstop .

示例：

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