我正在寻找一种简单的方法来读/写基本数据框:
symbMat <- matrix("AJY", "6A", "6J", 0, 0, ncol=5)
colnames(symbMat) <- c("Symb1","Symb2","Symb3","lastVstamp","completedRows")
testFrame<-List(symbMat,matrix(c("date1","date2")))
所以testFrame现在看起来像
[[1]]
Symb1 Symb2 Symb3 lastVstamp completedRows
[1,] "AJY" "6A" "6J" "0" "0"
[[2]]
[,1]
[1,] "date1"
[2,] "date2"
所以问题就在于此 read.table(&#34; MultiTable&#34;,header = TRUE) 给我一个文件,将它全部视为一个2x6矩阵(最后一列的混淆名称)
"Symb1" "Symb2" "Symb3" "lastVstamp" "completedRows" "structure.c..date1....date2.....Dim...c.2L..1L.."
"1" "AJY" "6A" "6J" "0" "0" "date1"
"2" "AJY" "6A" "6J" "0" "0" "date2"
,而
install.packages("MASS")
library(MASS)
write.matrix(testFrame,file="MultiTable")
只创建一个文件
AJY,6A,6J,0,0 date1,date2
这显然是相当多的信息丢失。此外,还没有read.matrix(),所以我不知道该功能的重点是什么
有什么想法吗?
答案 0 :(得分:1)
首先,testFrame
不是data.frame
。 data.frame
是R中非常特定的对象类型。但是,这不会影响能够保存和重新加载数据。保存和加载数据有两组功能:save()
/ load()
和dump()
/ source()
。第一种是二进制格式,第二种是文本格式(虽然结构与屏幕上的内容不同)。
修复示例中的拼写错误:
symbMat <- matrix(c("AJY", "6A", "6J", 0, 0), ncol=5)
colnames(symbMat) <- c("Symb1","Symb2","Symb3","lastVstamp","completedRows")
testFrame<-list(symbMat,matrix(c("date1","date2")))
testFrame
是
> testFrame
[[1]]
Symb1 Symb2 Symb3 lastVstamp completedRows
[1,] "AJY" "6A" "6J" "0" "0"
[[2]]
[,1]
[1,] "date1"
[2,] "date2"
save()
和load()
:
save(testFrame, file="temp.RData")
load(file="temp.RData")
dump()
和source()
:
dump("testFrame", file="temp.R")
source(file="temp.R")
请注意引用dump()
的第一个参数。然后temp.R
testFrame <-
list(structure(c("AJY", "6A", "6J", "0", "0"), .Dim = c(1L, 5L
), .Dimnames = list(NULL, c("Symb1", "Symb2", "Symb3", "lastVstamp",
"completedRows"))), structure(c("date1", "date2"), .Dim = c(2L,
1L)))
以与dput()
相同的方式表示对象。