如何使用ggplot2在轴标签上显示层次结构？

Question

我想用ggplot2创建这样的情节:

(我在这里犯了一个小错误,导致并非所有标签都显示出来.显然我确实想要显示所有标签:))但是,我的Google搜索没有显示任何内容.我得到的最接近的是来自plotrix的barNest,但是,我不喜欢生成的图表的质量.ggplot2看起来好多了.

在理想情况下,我本来希望能够做到这样的事情:scale_x_discrete("Axis Title",labels = Level1 + Level2 + Level3)然后Level1,Level2和Level3将成为数据帧的列.用于qplot函数.如果我能让它工作,我想创建一个函数来将这种类型的功能添加到scale函数.也许scale_x_hierarchical会更好.可以使用以下代码生成类似的数据:

data <- data.frame(
  Subject = c(rep(1, 48), rep(2, 48), rep(3, 48), rep(4, 48)), 
  month = rep(c(rep(1, 12), rep(4, 12), rep(7, 12), rep(10, 12)), 4), 
  day = rep(c(rep(1, 4), rep(11, 4), rep(21, 4)), 16), 
  hour = rep(c(0, 6, 12, 18), 48), 
  data = rnorm(192))

顺便说一句,这里使用的图像是使用Spotfire创建的.

Answer 1

这有点不同，但 LearnR 博客有一篇关于将表格链接到图形的帖子，使其看起来像这样：