write.csv: file name depends on an evaluation

Question

I have a large dataset with 9,000 entries. I hope to split it into subfiles and name them as 1-1000, 1001 - 2000 etc.

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)})

Using the code above, I get an error saying "Error: unexpected '}' in file = paste0("directory_name/", start, "-", end,".csv"), row.names = FALSE)". I am not sure how to solve this, could anyone help me? Thank you.

It's easier to help you if you include a simple [reproducible example](https://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example) with sample input and desired output that can be used to test and verify possible solutions. This error usually means you have made a type and have mismatched parenthesis or braces. — MrFlick, May 08 '21 at 01:06

score 2 · Accepted Answer · answered May 08 '21 at 01:43

Names are stored as characters so if you want to perform any mathematical calculation on them you need to change them to numeric. You can try this -

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)
})

write.csv: file name depends on an evaluation

1 Answers1