使用双列表的问题

Question

我在尝试在R中实现双列表时遇到问题。如果只使用一个元素初始化一个子列表，那么在我尝试添加更多元素后，我会收到错误消息：

  

提供的元素多于要替换的元素

以下是一个例子：

#
# This is OK
#
a <- list()
a[["elem1"]][["elem2"]] <- c(10,20)
a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30,40))

这是a：

的输出

> a
$elem1
$elem1$elem2
[1] 10 20 30 40

但是，

#
# This is giving error:
#
a <- list()
a[["elem1"]][["elem2"]] <- c(10)
a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30,40))

Error in a[["elem1"]][["elem2"]] <- c(a[["elem1"]][["elem2"]], c(30, 40)) : 
more elements supplied than there are to replace

这是a：

的输出

> a
$elem1
elem2 
10 

我将不胜感激。