如何强制将字符列转换为列表列

Question

我正在尝试绑定数据帧行。我在聚合后生成一些列表列的数据框，但有些是字符。我找不到绑定它们的方法。我尝试使用as.list()转换字符列，但没有奏效。

library(dplyr) 
df1 <- data.frame(a = c(1,2,3),stringsAsFactors = F) 
df1$b <- list(c("1","2"),"4",c("5","6")) 
> df1 
    a b 
1 1 1, 2 
2 2 4 
3 3 5, 6 
df2 <- data.frame(a=c(4,5),b=c("9","12"),stringsAsFactors = F) 
> df2 
    a b 
1 4 9 
2 5 12 
dplyr::bind_rows(df2,df1) 
Error in bind_rows_(x, .id) : 
    Column `b` can't be converted from character to list 

Answer 1

我不知道dplyr库很好，但低于使用基础R的rbind()似乎工作：

df1 <- data.frame(a = c(1,2,3),stringsAsFactors = F) 
df1$b <- list(c("1","2"),"4",c("5","6")) 
df2 <- data.frame(a=c(4,5),b=c("9","12"),stringsAsFactors = F) 

result <- rbind(df1, df2) 

class(result$a) 
[1] "numeric" 
class(result$b) 
[1] "list" 

Demo

如果你想获得这与bind_rows()工作，首先查看错误消息。它看起来像dplyr不喜欢那个数据框有字符数据，而另一个有列表数据。您可以尝试将字符列转换为列表，然后拨打bind_rows，例如

df2$b <- as.list(df2$b) 
dplyr::bind_rows(df2,df1)