rbind数据框列表，包含一列字符和数字

Question

我有两个具有相同列名但具有不同行数的数据框的列表，rbind.fill可以帮助将它们组合成一个大数据框，但问题是df1中的第一列是数字数据，并且df2是字符数据，当它们合并时，字符数据全部变为1，我已经四处搜索，但没有解决问题，任何帮助都将不胜感激。 一个小例子是：

station <- c(1:10)
value <- c(101:110)  
df1 <- data.frame(cbind(station,value)) 
station <- c("a","b")
value <- c(101:102)  
df2 <- data.frame(cbind(station,value)) 
data1 <- rbind.fill(df1,df2)

我希望角色仍然是角色，谢谢。

Answer 1

如果它把它变成数字，它不是角色，这是一个因素。 用str来检查这个。 这将让你前进：

df2$station <- as.character(df2$station)

编辑：或者在您创建数据框时使用保持R将字符串转换为因子：

df2 <- data.frame(cbind(station,value), stringsAsFactors = FALSE) 

控制台输出：

> station <- c(1:10)
> value <- c(101:110)  
> df1 <- data.frame(cbind(station,value)) 
> station <- c("a","b")
> value <- c(101:102)  
> df2 <- data.frame(cbind(station,value)) 
> df2$station <- as.character(df2$station)
> 
> library(plyr)
> data1 <- rbind.fill(df1,df2)
> data1
   station value
1        1   101
2        2   102
3        3   103
4        4   104
5        5   105
6        6   106
7        7   107
8        8   108
9        9   109
10      10   110
11       a     1
12       b     2

Answer 2

看起来您不必使用rbind.fill因为您的数据框具有相同的列名。 试试rbind会很好用。 你声明你正在使用一个列表，所以你可能想知道do.call这个小技巧：

df1 <- data.frame(station = 1:10, value = 101:110) 
df2 <- data.frame(station = c("a","b"), value = 101:102) 
(data1 <- rbind.fill(df1,df2))
rbind(df1,df2)

dfl <- list(df1,df2)
do.call("rbind",dfl)

请注意，我有点“清理”您的示例代码。 您不必连接所有内容。