r - 如何在R中组合表格（工作日（））

Question

我想将 3与3 结合起来，table(weekdays())仅此而已。Rlibrary(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 随便

如何组合三个表？没有任何库函数？我会用它来画一个情节。

Answer 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