自动保存大量数据集

Question

我正在创建22个数据集，每个数据集都有一个包含3列和3行的矩阵。我试图在我的工作目录中自动保存22个数据集，但我的代码不起作用。

她是我的代码：

A<-array(0,dim=c(3,3,22))
for ( iter in 1:22)
{
x<-rnorm(9,0,1)
y<-matrix(x,ncol=3,byrow=T)
A[,,iter]<-y
filename1 <- paste (" A",1:22 ,".csv ", sep ="")
write.table( A[,,iter]  , file = filename1 , row.names =FALSE ,col.names = FALSE )
}

它给了我一个信息：

  

文件错误（文件，ifelse（追加，“a”，“w”））：     无效的“描述”参数

     

另外：警告信息：   在if（file ==“”）file＆lt; - stdout（）else if（is.character（file））{：     条件的长度> 1，只使用第一个元素

有人可以帮助我吗？

Answer 1

文件名应该是filename1 <- paste0("A", iter, ".csv");使用1:22将同时生成22个文件名。