小编Col*_*ath的帖子

我有一个数据框，它有一列包含嵌套列表。我正在努力从这些嵌套列表中提取用户名（我对此很陌生）。

虚拟数据：

myNestedList <- list("1" = list('username' = "test",
                              "uninteresting data" = "uninteresting content"),
                     "2" = list('username' = "test2",
                                "uninteresting data" = "uninteresting content"))
Column1 <- c("A","B","C")
column2 <- c("a","b","c")
mydf <- data.frame(Column1, column2)
mydf$nestedlist <- list(myNestedList)

我想提取每一行的所有用户名并将它们附加到一个新列，如果一行有多个用户名，则第二个/第三个/第 n 个用户名应该只附加一个单独的“，”。我尝试过类似sapply(mydf$nestedlist, [[, 1)但这只是给了我整个列“nestedlist”的一个列表。

对于上下文：我正在尝试构建一个有向图，以便在 Networkx 或 Gephi 中进一步使用。column1 中的数据是节点，用户名是提及，因此是边。如果有另一种方法可以做到这一点，而不从嵌套列表中提取用户名，这也可能是一个解决方案。

在此先感谢您的帮助！:)