我想知道如何在分面打印中控制条形文本的大小.我的问题

作为一个例子,考虑MPG数据集.

    library(ggplot2) 
    qplot(hwy, cty, data = mpg) + facet_grid( . ~ manufacturer)

由此产生的output个方面产生的标题,不适合在漫画.

I'm thinking there must be a way to use grid to deal with the strip text. But I'm still a novice and wasn't sure from the grid appendix in Hadley's book how, precisely, to do it. Also, I was afraid if I did it wrong it would break my washing machine, since I believe all technology is connected through The Force :-(

非常感谢.

推荐答案

例如,可以使用theme_text()修改strip.text.x(或strip.text.y)

qplot(hwy, cty, data = mpg) + 
      facet_grid(. ~ manufacturer) + 
      opts(strip.text.x = theme_text(size = 8, colour = "red", angle = 90))

Update: for ggplot2 version > 0.9.1

qplot(hwy, cty, data = mpg) + 
      facet_grid(. ~ manufacturer) + 
      theme(strip.text.x = element_text(size = 8, colour = "red", angle = 90))

R相关问答推荐

如何在x轴下方画一条带有箭头的线?

有没有方法将paste 0功能与列表结合起来?

高质量地将R格式的图表从Word中输出

向gggplot 2中的数据和轴标签添加大写和星号

有没有一种方法可以从函数中创建一个值的列表,然后将这些值变成R中的直方图?我一直觉得不行

根据多个条件增加y轴高度以适应geom_text标签

使用geom_segment()对y轴排序

如何优化向量的以下条件赋值?

删除具有相同标题的tabPanel(shinly)

如何写商,水平线,在一个单元格的表在R

如何删除最后一个可操作对象

从圆到R中的多边形的标绘雷达图

如何使用同比折线图中的个别日

R中的类别比较

变长向量的矢量化和

删除在R中的write.table()函数期间创建的附加行

当由base::限定时,`[.factor`引发NextMethod错误

TidyVerse中长度不等的列结合向量

替换在以前工作的代码中有x行&q;错误(geom_sf/gganimate/dow_mark)

如何使用循环从R中的聚合函数创建列,而不会在名称中给出&q;$&q;?