如果一個三維的數據導出csv文件后，再從csv導出時如何導出成三維的數據？

#?Create?two?vectors?of?different?lengths.
>?vector1?<-?c(5,9,3)
>?vector2?<-?c(10,11,12,13,14,15)
>?column.names?<-?c("COL1","COL2","COL3")
>?row.names?<-?c("ROW1","ROW2","ROW3")
>?matrix.names?<-?c("Matrix1","Matrix2")
>?
>?#?Take?these?vectors?as?input?to?the?array.
>?result?<-?array(c(vector1,vector2),dim=c(3,3,2),dimnames?=?list(column.names,row.names,matrix.names))
>?print(result)
,?,?Matrix1

?????ROW1?ROW2?ROW3
COL1????5???10???13
COL2????9???11???14
COL3????3???12???15

,?,?Matrix2

?????ROW1?ROW2?ROW3
COL1????5???10???13
COL2????9???11???14
COL3????3???12???15

>?write.csv(result,file="d:/a.csv")
>?a<-read.csv("d://a.csv",stringsAsFactors=F)