您可以在图例区域内设置图例的位置,例如
... + theme(legend.justification=c(1,0), legend.position=c(1,0))
是否有类似的简便方法来更改带状文本的位置(或分组图中的因子水平)
library(reshape2); library(ggplot2)
sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point() +
facet_grid(. ~ sex)
sp
(http://www.cookbook-r.com/Graphs/Facets_%28ggplot2%29/)
在晶格中,我将使用诸如strip.text = levels(dat $ Y)[panel.number()]和panel.text(...)之类的东西,但是可能还有一种更简洁的方法...
克里斯托夫(Thof)
这是一种方法:
ggplot(tips, aes(x = total_bill, y = tip / total_bill)) +
geom_point() +
facet_grid(. ~ sex) +
geom_text(aes(label = sex), x = Inf, y = Inf, hjust = 1.5, vjust = 1.5) +
theme(
strip.background = element_blank(),
strip.text = element_blank()
)
但是,这并没有移动strip.text
,而是添加了一个geom_text
元素并关闭了strip.background
和strip.text
,但是我认为它可以达到预期的效果。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句