如何操作facet_grid地块的带文字？如何操作facet_grid地块的带文字？(How can

我不知道我怎么能操纵带文字的大小刻面图。 我的问题是相似的情节标题的问题 ，但我特别关心的操纵不积冠军，但出现在小冠军（strip_h）的文本。

作为一个例子，考虑MPG数据集。

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

产生的输出产生不适合带一些小的标题。

我想一定有使用方式grid应对条的文本。 但我还是一个新手，并没有从确保grid附录哈德利的书如何，精确，做到这一点。 另外，我很害怕，如果我这样做是错了，它会打破我的洗衣机，因为我相信所有的技术是通过强制连接:-(

提前谢谢了。

Answer 1:

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

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

更新：对于GGPLOT2版> 0.9.1

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

Answer 2:

目前的使用opts和theme_text似乎被弃用。 [R建议使用theme和element_text 。 有解决的答案可以在这里找到： http://wiki.stdout.org/rcookbook/Graphs/Facets%20%28ggplot2%29/#modifying-facet-label-text

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

Answer 3:

我猜的例子mpg改变旋转角度和字体大小是好的，但在很多情况下，你可能会发现自己与有相当长的标签变量，它可以成为颈部疼痛（直译）尝试读取旋转冗长标签。

因此，除了（或补充），以变化的角度和大小，我通常格式化的定义要素标签facet_grid时，他们可以在某种程度上是有道理的分裂。

通常，如果我有一个dataset$variable用绳子，看起来像

c("median_something", "aggregated_average_x","error","something_else")

我简单地做：

reformat <– function(x,lab="\n"){ sapply(x, function(c){ paste(unlist(strsplit(as.character(c) , split="_")),collapse=lab) }) }

[也许有更好的定义， reformat ，但至少这一个工作正常。]

dataset$variable <- factor(dataset$variable, labels=reformat(dataset$variable, lab='\n')

而在磨制，所有的标签将是非常可读。

ggplot(data=dataset, aes(x,y)) + geom_point() + facet_grid(. ~ variable)

文章来源: How can I manipulate the strip text of facet_grid plots?