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