これは、この質問の続きであり、垂直グリッド線を抑制しようとしていました。
学習者によって提供された解決策は、scale_x_continuous(breaks = NA)を追加することでしたが、これには、x軸ラベルも抑制するという副作用もありました。手でラベルを書き戻すのはとてもうれしいですが、ラベルをどこに置くべきかを理解する方法がわかりません。
もう1つのオプションは、すべてのグリッド線を抑制し(opts(panel.grid.major = theme_blank())などを使用)、主要な水平グリッド線だけを描画することです。繰り返しますが、ここでの問題は、geom_hline()に提供するプロットのブレークがどのようになっているのかを把握する方法です。
したがって、基本的に、私のオプションは次のとおりです。
- 垂直グリッド線とx軸ラベルを抑制し(scale_x_continuous(breaks = NA)を使用)、x軸ラベルをに追加し直します。
- すべてのグリッド線を抑制し(opts(panel.grid.major = theme_blank())を使用)、geom_hline()を使用して主要な水平グリッド線を追加し直します。
2つのオプションは次のとおりです。
library(ggplot2)
data <- data.frame(x = 1:10, y = c(3,5,2,5,6,2,7,6,5,4))
# suppressing vertical gridlines and x-axis labels
# need to re-draw x-axis labels
ggplot(data, aes(x, y)) +
geom_bar(stat = 'identity') +
scale_x_continuous(breaks = NA) +
opts(
panel.grid.major = theme_line(size = 0.5, colour = '#1391FF'),
panel.grid.minor = theme_blank(),
panel.background = theme_blank(),
axis.ticks = theme_blank()
)
# suppressing all gridlines
# need to re-draw horizontal gridlines, probably with geom_hbar()
ggplot(data, aes(x, y)) +
geom_bar(stat = 'identity') +
scale_x_continuous(breaks = NA) +
opts(
panel.grid.major = theme_blank(),
panel.grid.minor = theme_blank(),
panel.background = theme_blank(),
axis.ticks = theme_blank()
)