パッケージ Cowplot を使用して、(x - 上: "mpg") および (y - 右: "wt") で軸ラベルを抑制することができるかどうか疑問に思っていました。
library(ggplot2); library(cowplot)
plot_a <- ggplot(mtcars, aes(mpg,wt)) + geom_point()
ggdraw(switch_axis_position(plot_a, axis = 'xy',keep = 'xy'))
ありがとう!
あなたができる
# devtools::install_github("hadley/ggplot2")
# packageVersion("ggplot2")
# # [1] ‘2.1.0.9001’
library(ggplot2)
ggplot(mtcars, aes(mpg,wt)) +
geom_point() +
scale_x_continuous(sec.axis = sec_axis(~ .)) +
scale_y_continuous(sec.axis = sec_axis(~ .)) +
cowplot::theme_cowplot()
の注意事項を確認してくださいggplot2 2.2.0。
ここを参照してください: https://rdrr.io/cran/cowplot/man/panel_border.html
ggdraw行を次の
ように置き換えます。plot+panel_border(colour="black", size=0.5, linetype=1,remove=FALSE)