6

私はネストされたリストl3を次のように持っています:

l1<- as.list(c(1,2,3,4,5))
l1

l2<- as.list(c(6,7,8,9,10))
l2

l3<- list(l1,l2)
l3

l3は次のように表示されます。

> l3
[[1]]
[[1]][[1]]
[1] 1

[[1]][[2]]
[1] 2

[[1]][[3]]
[1] 3

[[1]][[4]]
[1] 4

[[1]][[5]]
[1] 5


[[2]]
[[2]][[1]]
[1] 6

[[2]][[2]]
[1] 7

[[2]][[3]]
[1] 8

[[2]][[4]]
[1] 9

[[2]][[5]]
[1] 10

l3が次のようになるように3番目のリストl4をl3に追加する必要があります。

[[1]][[1]]
    [1] 1

to

[[2]][[5]]
    [1] 10


[[3]][[1]]
    [1] 30

[[3]][[2]]
    [1] 32

[[3]][[3]]
    [1] 33

[[3]][[4]]
    [1] 34

[[3]][[5]]
    [1] 35

ここで、l4は次のとおりです。

l4<- as.list(c(31,32,33,34,35))

どうすればそれを達成できますか?私は、、を試しましたが(c)list明示的に引数を入れて、を取得しましたout of bounds error。これを行うために何を使用できますか?

4

2 に答える 2

21

それはで動作しappendますlist

append(l3, list(l4))

結果:

> str(append(l3, list(l4)))
List of 3
 $ :List of 5
  ..$ : num 1
  ..$ : num 2
  ..$ : num 3
  ..$ : num 4
  ..$ : num 5
 $ :List of 5
  ..$ : num 6
  ..$ : num 7
  ..$ : num 8
  ..$ : num 9
  ..$ : num 10
 $ :List of 5
  ..$ : num 31
  ..$ : num 32
  ..$ : num 33
  ..$ : num 34
  ..$ : num 35
于 2012-12-27T12:01:14.873 に答える