如果一個(gè)三維的數(shù)據(jù)導(dǎo)出csv文件后,再從csv導(dǎo)出時(shí)如何導(dǎo)出成三維的數(shù)據(jù)?
#?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)
怎么導(dǎo)出成老的數(shù)據(jù)?