4

以下在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 中工作?

编辑:我应该更清楚为什么我要经历这个将 alist视为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但这很笨重,如果可能的话,我想获得 a 的功能

4

1 回答 1

3

评论后编辑。

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 不能处理数组。所以转换为矩阵就可以了。不过,我只是timeSeries在 R 中使用该包,而不是在 SPlus 中将它一起破解。

于 2011-03-17T17:01:51.953 回答