对于R中的循环（意外的符号错误）

城堡矿工

我需要在下载的5个文件中计算totalMin。文件名都具有相同的格式：

“ 2013-07-citibike.csv”“ 2013-08-citibike.csv”

“ 2013-09-citibike.csv”“ 2013-10-citibike.csv”

“ 2013-11-citibike.csv”“ 2013-12-citibike.csv”

我需要编写一个for循环来读取这些文件，计算每个文件的最小值（某一特定列），然后计算所有文件的总最小值。

到目前为止，我有这个

numbers <- 07:12
filenames <- paste("2013-", numbers, "-citibike", ".csv", sep="")

overallMin <- 0
for (i in filenames) {
    trips <- read.csv(i)
    newMin <- min(trips)
    if (overallMin < newMin) {
        overallMin <- newMin
    }
}
overallMin

与csv部分混淆。另外，我得到一个错误：“ for（文件名中的i）{行程= read.csv（i）newMin”

罗伯特

直接定义文件名。另一件事，您需要指定列号，还是想要最少的所有文件？

filenames <-c("2013-07-citibike.csv", "2013-08-citibike.csv",
              "2013-09-citibike.csv", "2013-10-citibike.csv",
              "2013-11-citibike.csv", "2013-12-citibike.csv")

或用于sprintf获取正确的文件名

numbers <- 07:12
filenames <- paste("2013-", sprintf("%02d",numbers), "-citibike", ".csv", sep="")

overallMin <- 1e80 #big number or the minimum will probably be zero
desirecol <- 2
for (i in filenames) {
  trips <- read.csv(i)
  newMin <- min(trips[,desirecol])
  if (overallMin < newMin) {
    overallMin <- newMin
  }
}
overallMin

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。