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"

R添加到列表（嵌套列表）

1 个答案: