R 从列表中提取特定元素
我的结果是列表的形式,它就是这个形式R 从列表中提取特定元素,r,R,我的结果是列表的形式,它就是这个形式 $X1 fcst lower upper CI X1.fcst 0.1217507 -0.1295139 0.3730153 0.2512646 $X2 fcst lower upper CI X2.fcst 0.03534357 -0.1204348 0.1911219 0.1557783 $X3 fcst
$X1
fcst lower upper CI
X1.fcst 0.1217507 -0.1295139 0.3730153 0.2512646
$X2
fcst lower upper CI
X2.fcst 0.03534357 -0.1204348 0.1911219 0.1557783
$X3
fcst lower upper CI
X3.fcst 0.03301191 -0.05692609 0.1229499 0.08993801
$X4
fcst lower upper CI
X4.fcst 0.001622621 -0.06784667 0.07109191 0.06946929
$X5
fcst lower upper CI
X5.fcst 0.002349806 -0.05053648 0.0552361 0.05288629
$X6
fcst lower upper CI
X6.fcst -0.004397929 -0.04704999 0.03825413 0.04265206
$X7
fcst lower upper CI
X7.fcst 0.003693691 -0.02470371 0.03209109 0.0283974
$X8
fcst lower upper CI
X8.fcst -0.008413914 -0.03223563 0.0154078 0.02382171
$X9
fcst lower upper CI
X9.fcst -0.001122924 -0.02466012 0.02241428 0.0235372
我想提取fcst进行进一步分析,我尝试用这种方法解决
ad1 <- head(sapply(unlist(pred.ff1, recursive = FALSE), `[`, 1), 'fcst')
它无法从列表中提取特定元素。有人能帮忙吗?如果您的列表被称为
list
:
FCST = lapply(LIST, function(n){
n$fcst
})%>% unlist
要使用%>%
安装“magrittr”库。这仅仅是sappy(pred.ff1,`[`,`fcst”)
。这有点难以验证-您可以使用预期的结果将其最小化
FCST = lapply(LIST, function(n){
n$fcst
})%>% unlist