write.csv：文件名取决于评估

我有一个包含9000个条目的大型数据集。我希望将其划分为子文件，并将其命名为1-1000、1001-2000等

d <- split(df,rep(1:9,each=1000))

lapply(names(d),
       function(x){
         start <- x*1000-1000 + 1
         end <- x*1000
         
         write.csv(d[[x]], file = paste0("directory_name/", start, "-", "end",".csv"),
                             row.names = FALSE)}) 

---

d名称以字符形式存储，因此如果要对其执行任何数学计算，需要将其更改为数字。你可以试试这个-

d <- split(df,rep(1:9,each=1000))

lapply(names(d),function(x) {
     x1 <- as.numeric(x)
     start <- x1*1000-1000 + 1
     end <- x1*1000
     write.csv(d[[x]], sprintf("directory_name/%d-%d.csv", start, end),row.names = FALSE)
}) 

d名称以字符形式存储，因此如果要对其执行任何数学计算，需要将其更改为数字。你可以试试这个-

d <- split(df,rep(1:9,each=1000))

lapply(names(d),function(x) {
     x1 <- as.numeric(x)
     start <- x1*1000-1000 + 1
     end <- x1*1000
     write.csv(d[[x]], sprintf("directory_name/%d-%d.csv", start, end),row.names = FALSE)
}) 

d如果您包含一个简单的示例输入和所需的输出，可以用来测试和验证可能的解决方案，那么就更容易为您提供帮助。此错误通常意味着您创建了一个类型，并且有不匹配的括号或大括号。如果您包含一个简单的示例输入和所需的输出，可以用来测试和验证可能的解决方案，则更容易帮助您。此错误通常意味着您创建了一个类型，并且括号或大括号不匹配。