将数据框转换为具有R中一列名称的数据框的命名列表

Question

所以我将一个列表变成了一个长长的数据框，现在有一个列，它曾经是列表的名称，类似：

df <- map_df(list, ~as.data.frame(.x), .id="id")

现在，我想反过来说，根据该列将数据框转回命名列表。因此，例如以下数据：

df = data.frame(a=c("foo", "bar", "baz"), b=1:3)
df
    a b
1 foo 1
2 bar 2
3 baz 3

现在，我想创建一个列表，其中包含列a的名称，因此foo bar和baz的值现在是仅包含一行的数据帧：1表示a ，2代表b ...

lst = list(foo=data.frame(b=1), bar=data.frame(bar=2), baz=data.frame(b=3))

Answer 1

您还可以使用split：

split(df[-1], df[1])

Answer 2

第二种选择是将dplyr用于分组变量：

library(dplyr)

df %>% 
  group_split(a, .keep = FALSE)

Answer 3

我们可以使用：

library(tibble)
as.list(deframe(df))