ggplot2盒图的翻转弦

Question

我想翻转ggplot2盒图的和弦，在这里我也进行坐标转换。

library(ggplot2)

dat = data.frame(group = factor(c(rep(1,3),rep(2,6))),
                 vals   = c(c(0.1,2.25,1000), c(0.11,0.21,0.21,4.55,5.06,29.48)))


   ggplot(dat,aes(group,vals)) + geom_boxplot() 
   ggplot(dat,aes(group,vals)) + geom_boxplot()  + coord_trans(y="log10")

如果我现在添加"+ coord_flip()"，那么轴的日志缩放就会丢失。

 ggplot(dat,aes(group,vals)) + geom_boxplot()  + coord_trans(y="log10") + coord_flip()

有什么方法可以实现和弦翻转吗？

谢谢您的评论！

最好的，燕姿

Answer 1

也许有个解决办法。您可以使用viewport()翻转您的绘图。编辑:使用包cowplot，您可以切换y轴。

library(ggplot2)
library(grid)
library(cowplot)
p <- ggplot(dat,aes(group,vals)) + geom_boxplot()  + coord_trans(y="log10") + theme(axis.text.x = element_text(angle = 90, hjust = 1), axis.title.x = element_text(angle = 90, hjust = 1), axis.text.y = element_text(angle = 90, hjust = 1))

pp <- ggdraw(switch_axis_position(p, axis = 'y'))

grid.newpage()
print(pp, vp = viewport(angle = -90, width = 0.7, height = 0.8))

​

​

Answer 2

只需使用scale_y_log10

ggplot(dat,aes(group,vals)) + 
 geom_boxplot() + 
 coord_flip() + 
 scale_y_log10()

那就按需要调整。