我想向数据框的每一行添加一个列表。
# DATA
> df <- tibble(ID = 1:6, x = letters[1:6])
# A tibble: 6 x 2
ID x
<int> <chr>
1 1 a
2 2 b
3 3 c
4 4 d
5 5 e
6 6 f
添加单个值很容易。
df$new.col <- "boo"
# A tibble: 6 x 3
ID x new.col
<int> <chr> <chr>
1 1 a boo
2 2 b boo
3 3 c boo
4 4 d boo
5 5 e boo
6 6 f boo
添加多个值并不简单。
不是将列表添加到每一行(如上所述),而是将列表的内容应用于整个列。这不是很直观:
df$my.lists <- list("boo", "bah")
df %>% unnest()
# A tibble: 6 x 3
ID x my.lists
<int> <chr> <chr>
1 1 a boo
2 2 b bah
3 3 c boo
4 4 d bah
5 5 e boo
6 6 f bah
......也没有......
df$my.lists <- c("boo", "bah")
df %>% unnest()
# A tibble: 6 x 3
ID x my.lists
<int> <chr> <chr>
1 1 a boo
2 2 b bah
3 3 c boo
4 4 d bah
5 5 e boo
6 6 f bah
我想要的结果将在每一行中有一个列表,如下所示:
# A tibble: 6 x 3
ID x my.lists
<int> <chr> <chr>
1 1 a <list [2]>
2 2 b <list [2]>
3 3 c <list [2]>
4 4 d <list [2]>
5 5 e <list [2]>
6 6 f <list [2]>
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句