如何在 R 中合并 table(weekdays())
how to combine table(weekdays()) in R
我想将 R
中的 3 table(weekdays())
与 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 whatever
如何合并三个表?没有任何库函数?
我会用它来画图。
将它们转换为数据帧,将它们与 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
我想将 R
中的 3 table(weekdays())
与 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 whatever
如何合并三个表?没有任何库函数? 我会用它来画图。
将它们转换为数据帧,将它们与 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