r - 对于 R 中的循环(意外的符号错误)

Question

我需要计算已下载的 5 个文件的 overallMin。文件名都具有相同的格式:

"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 in filenames) { trips = read.csv(i) newMin”中的意外符号

Answer 1

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

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