从字符向量中列出空列表是否有更好的方法？

Question

我编写了一个循环，用于从字符向量创建空列表列表。输出列表包含字符向量中每个项目的一个空列表，其中该字符串作为其名称。这是我所写的可重复的例子：

charVect <- rownames(mtcars)

listOfLists <- list()

for ( i in seq_along(charVect)){
  charVect[i]
  listOfLists[[charVect[i]]] <- list()

}

我似乎有太多的代码行，我在这里找不到类似的问题，或者在google搜索中实现相同目标的函数。

这是最好的方法吗？我可以使用任何函数或方法来减少代码行吗？

Answer 1

尝试

setNames(lapply(vector("list", nrow(mtcars)), function(x) list()), rownames(mtcars))