我想不再将table(weekdays())
中的3 R
与library(twitteR)
和library(ROAuth)
合并。
我正在用推文来做。我的工作是结合3条推文创建的天数(天)。
a=table(weekdays(dsADF[,"created"]))
b=table(weekdays(dsBDF[,"created"]))
c=table(weekdays(dsCDF[,"created"]))
比方说,我有一个星期一:100,星期二:200
从b开始,星期一= 30,星期二= 40,星期四= 130,星期五= 200 从c无论
如何合并三个表?没有任何库函数? 我将用它来绘制图。
答案 0 :(得分:1)
将它们转换为数据帧,将它们与rbind结合在一起,并与xtabs转换回去。
a <- as.table(c(Monday = 100, Tuesday = 200))
b <- as.table(c(Monday = 30, Tuesday = 40, Thursday= 130, Friday = 200))
xtabs(Freq ~ Var1, rbind(as.data.frame(a), as.data.frame(b)))
给予:
Var1
Monday Tuesday Thursday Friday
130 240 130 200