R添加到列表中(嵌套列表)

Question

我有list1：

 list1<-list("outliers"=list("values"=list(list(c("a","b","c"),
                                           "dimensionKey"=2101120,
                                           "metric"="1")
                                      )
                        )
        )

 > list1
$outliers
$outliers$values
$outliers$values[[1]]
$outliers$values[[1]][[1]]
[1] "a" "b" "c"

$outliers$values[[1]]$dimensionKey
[1] 2101120

$outliers$values[[1]]$metric
[1] "1"

我需要在这个列表中添加以下值：

list2<-list(c("e", "f", "g", "m"),
 "dimensionKey"=2101120,
 "metric"="2")

我想让瑞索看看：

   $outliers
   $outliers$values
   $outliers$values[[1]]
   $outliers$values[[1]][[1]]
   [1] "a" "b" "c"

   $outliers$values[[1]]$dimensionKey
   [1] 2101120

   $outliers$values[[1]]$metric
   [1] "1"

   $outliers$values[[2]]
   $outliers$values[[2]][[1]]
   [1] "e" "f" "g" "m"

   $outliers$values[[2]]$dimensionKey
   [1] 2101120

   $outliers$values[[2]]$metric
   [1] "2"

我怎么能做到这一点？

P.S.：我需要这个函数来添加现有的列表值，因此我不能一蹴而就。

谢谢!

Answer 1

您可以使用以下方法：

list1$outliers$values <- append(list1$outliers$values, list(list2))

结果(list1)：

$outliers
$outliers$values
$outliers$values[[1]]
$outliers$values[[1]][[1]]
[1] "a" "b" "c"

$outliers$values[[1]]$dimensionKey
[1] 2.10112e+06

$outliers$values[[1]]$metric
[1] "1"


$outliers$values[[2]]
$outliers$values[[2]][[1]]
[1] "e" "f" "g" "m"

$outliers$values[[2]]$dimensionKey
[1] 2.10112e+06

$outliers$values[[2]]$metric
[1] "2"