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

Question

以下在 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 的功能

Answer 1

在 cmets 之后编辑。

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 中将它一起破解。