我正在做一个相对简单的分析,我把它放在一个函数中,在特定文件夹中的所有文件上.我想知道是否有人有任何提示可以帮助我在许多不同的文件夹上自动执行该过程.
files <- (Sys.glob("*.csv"))
...我从使用R找到列出具有指定扩展名的所有文件
然后以下代码将所有这些文件读入R.
listOfFiles <- lapply(files, function(x) read.table(x, header = FALSE))
Run Code Online (Sandbox Code Playgroud)
...来自操纵R中的多个文件
但是这些文件似乎是作为一个连续列表而不是单个文件读取的...如何更改脚本以将特定文件夹中的所有csv文件作为单独的数据帧打开?
其次,假设我可以单独读取所有文件,如何一次性完成所有这些数据帧的功能.例如,我创建了四个小型数据框,以便我可以说明我想要的内容:
Df.1 <- data.frame(A = c(5,4,7,6,8,4),B = (c(1,5,2,4,9,1)))
Df.2 <- data.frame(A = c(1:6),B = (c(2,3,4,5,1,1)))
Df.3 <- data.frame(A = c(4,6,8,0,1,11),B = (c(7,6,5,9,1,15)))
Df.4 <- data.frame(A = c(4,2,6,8,1,0),B = (c(3,1,9,11,2,16)))
Run Code Online (Sandbox Code Playgroud)我还编写了一个示例函数:
Summary<-function(dfile){
SumA<-sum(dfile$A)
MinA<-min(dfile$A)
MeanA<-mean(dfile$A)
MedianA<-median(dfile$A)
MaxA<-max(dfile$A)
sumB<-sum(dfile$B)
MinB<-min(dfile$B)
MeanB<-mean(dfile$B)
MedianB<-median(dfile$B)
MaxB<-max(dfile$B)
Sum<-c(sumA,sumB)
Min<-c(MinA,MinB)
Mean<-c(MeanA,MeanB)
Median<-c(MedianA,MedianB)
Max<-c(MaxA,MaxB)
rm(sumA,sumB,MinA,MinB,MeanA,MeanB,MedianA,MedianB,MaxA,MaxB)
Label<-c("A","B")
dfile_summary<-data.frame(Label,Sum,Min,Mean,Median,Max)
return(dfile_summary)}
Run Code Online (Sandbox Code Playgroud)
我通常会使用以下命令将函数应用于每个单独的数据帧.
Df1.summary <-Summary(dfile)
有没有办法,而不是将函数应用于所有数据框,并使用摘要表中的数据框的标题(即Df1.summary).
非常感谢,
凯蒂
r ×1