将向量添加到循环中的数据帧

时间:2016-06-29 20:15:24

标签: r

我想创建一个接受目录的函数,然后在该目录中读取100个csv文件。然后,我想在一个数据框(" df"在我的代码中)存储每个文件的文件ID和没有丢失数据的行数。所以我的数据框在完成时将有两个变量(列)和100行。

这是我的代码。这可以工作,但我的数据框中唯一的一行,当它完成时,是最后一个文件处理的数据,而不是所有文件。看来我的数据框每次都会被循环覆盖。

myFunction <- function(directory) {
    df <-- data.frame(Id=integer(),nobs=integer())

    for(i in 1:100) {
        fileName <- sprintf("%03d.csv",i)
        rowData <- read.csv(paste(directory,fileName,sep=""),header=T)
        completeCases = rowData[complete.cases(rowData),]

        df <- rbind(c(i,length(completeCases[[1]])))
    }

    df
}

0 个答案:

没有答案