r - R/Splus 中具有可变长度数据的数据帧

以下在 R 中工作正常

myarray <- as.array(list(c(5,5), 9, c(4,2,2,4,6)))
mydf    <- as.data.frame(myarray)

但在 Splus 中它没有---给出错误消息:

Problem in data.frameAux.list(x, na.strings = na.st..: arguments imply differing
 number of rows: 2, 1, 5
Use traceback() to see the call stack

问:怎么回事？我怎样才能让它在 Splus 中工作？

编辑:我应该更清楚地说明为什么我要经历这个将 list 视为 data.frame 的奇怪过程。这是因为我最终想在 Splus 中做以下类似的事情:

mypos <- timeSeq("1/1/08", "1/3/08", by = "days")
myts <- timeSeries(data = mydf, positions = mypos)

我猜现在最好的可行选择是建立一个列表，如:

mytshack <- list(mypos, as.list(myarray))

但这很笨拙，如果可能的话，我想获得 timeSeries 的功能

最佳答案

评论后编辑。

SPlus 不允许将向量作为数据帧中的值，这与 R 不同。您必须为此使用一个列表，我只是这样做:

day <- c("1/1/2000","1/2/2000","1/3/2000")
names(myarray) <- day

它允许以通常的方式访问数据:

> myarray[["1/1/2000"]]
[1] 5 5

鉴于您确认这实际上是您想要的，以及有关数据集的额外信息，请尝试以下操作:

myarray <- as.array(list(c(5,5), 9, c(4,2,2,4,6)))
mydf <- as.matrix(myarray)
colnames(mydf) <- "myarray"


mypos <- timeSeq("1/1/08", "1/3/08", by = "days")
myts <- timeSeries(data = mydf, positions = mypos)
seriesData(myts)

这适用于 SPlus。 timeSeries 需要一个矩形对象，而 as.rectangular 不能处理数组。所以转换为矩阵就可以了。不过，我只是在 R 中使用 timeSeries 包，而不是在 SPlus 中将其组合在一起。