I have an array. It has lat,lon,time,and value. Time starts from 1 to 300. Here is part of array for time=1.
myarray[,,1]
lon
One way is
for (i in 1:300) {
write.table(myarray[,,i],file=""myarray.i.csv"",append=TRUE,sep=",",col.names=TRUE,row.names=TRUE)
}
There are multiple ways of going about this:
paste('myarray', i, 'csv', sep = '.')
or:
sprintf('myarray.%d.csv', i)
I prefer the last one.
This should work fine:
n = dim(mydata)[3]
for(i in 1:n) {
#unpack a 3D array
mat = mydata[,,i]
form = sprintf('subject_%s.csv', i)
write.csv(mat, file = form)
}