-4

我有一个 JSON 文件“adjFloatTest.data”。在 R 中,我使用以下代码从该文件中读取字段“Volume”:

json <- fromJSON("adjFloatTest.data")
volume <- json$volume

音量值如下

> volume
$AAPL
$AAPL[[1]]
1980-12-12 
  16751200 

$AAPL[[2]]
1980-12-15 
 100424081 

$AAPL[[3]]
1980-12-16 
 0.1177374 

$AAPL[[4]]
1980-12-17 
   7164476 

$AAPL[[5]]
1980-12-18 
   5364366 

每个元素对应公司、日期、价值。我想将每个日期存储到一个列表中。怎么可能?

4

2 回答 2

0

这将为您提供日期列表

sapply(volume,names)
于 2013-03-01T08:12:03.933 回答
-1

以下应该有效:

 sapply(volume, function(x) lapply(x, "[[", 1))

但是可以复制+粘贴的可重现示例会有所帮助。

如果上述方法不起作用,请使用诸如dput(volume[1:2])提供一些可行的示例数据之类的东西。

于 2013-03-01T06:58:04.107 回答