R中的CrossTab访问图

Question

我有这样的数据结构：

F1           F2         2012   2011 
Dinner      Monday        5      10
Lunch       Tuesday      20      15
Breakfast   Wednesday    4       20

我想要创建一个跨选项卡可视化图形，就像本文中描述的那样：

visualizing crosstab tables with a plot in R

但是，我希望图上有两列，这样我就可以看到年复一年的差异。

我在上面的链接中成功地复制了代码，用一年的时间创建了图表。有什么办法让我再加一年吗？

Answer 1

首先，我们将您的数据重新排列为长格式：

dflong <- df %>% tidyr::gather(key, value, -(F1:F2))

然后，在文章中使用ggplot方法，只需添加facet_grid()

ggplot(dflong, aes(F1, F2)) + 
  geom_point(aes(size = value), colour = "green") + 
  theme_bw() + xlab("") + ylab("") +
  scale_size_continuous(range=c(10,30)) + 
  geom_text(aes(label = value)) +
  facet_grid(. ~ key)

这意味着：

​

​