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

只需使用scale_y_log10:

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

然后根据需要进行调整即可。

Answer 2

也许有解决方法。您可以使用 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))

ggplot2 箱线图的翻转坐标

Flip coords for ggplot2 boxplot

r

transform

ggplot2

boxplot