使用 read_csv 创建循环函数 - RStudio

Question

我在 RStudio 中有代码，它使用 paste 函数根据条件导入 csv。

Name <- "Sam"
Location <- "Barnsley"
Code <- "A"

Test2 <- read_csv(paste("C:/Users/....,Opposition , " (",Code,")/Vs ",Location, " (",Code,") Export for ",Name,".csv",sep = ""),skip = 8)

我通常在这个导入代码后面跟着几行代码进行计算。为了争论：Run Code Series

我想重新创建此代码以创建名称列表，并让代码逐个运行，然后运行代码。

期望：

Name <- c("Sam","David","Paul","John")

然后能够运行导入代码，并在每次导入后使用Run Code Series，然后再导入下一个名称。

Answer 1

根据您的问题，我相信您希望以每个名称的单独数据框结尾。如果是这样，你可以这样做：

Names <- c("Sam","David","Paul","John")
Location <- "Barnsley"
Code <- "A"
for(i in Names){
    Test2 <- read_csv(paste("C:/Users/....,Opposition" , " (", Code,")/Vs ", Location, " (",Code,") Export for ", i, ".csv", sep = ""), skip = 8)
    Run Code Series
    assign(paste("df_for_", i, sep = ""), Test2)
}

这将遍历您的名称列表，并在循环中以 Test2 的形式打开文件。您在 Test2 上执行计算，然后使用粘贴将其分配给列表中特定名称的数据框。此外，您在 read_csv 行中的引号不匹配，因此需要更正。