R语言保存多个csv

如何使用R语言循环语句一次性保存并导出多个不同的csv文件

fileNames <- c("file1.csv","file2.csv","file3.csv")
allData <- c(csvData1, csvData2, csvData3) #data.frame格式
for(i in 1:length(fileNames){
  write.csv(allData[i], fileNames[i])
}