r - R ggplot2: y 軸上の水平線に数値でラベルを付ける

Question

ggplot に水平線があり、y 軸に値 (7.1) を付けたいと思います。

library(ggplot2)
df <- data.frame(y=c(1:10),x=c(1:10))
h <- 7.1
plot1 <- ggplot(df, aes(x=x,y=y)) + geom_point() 
plot2 <- plot1+ geom_hline(aes(yintercept=h))

ご協力ありがとうございました。

Answer 1

7.1 を y 軸の一部にするのか、単に線にラベルを付ける方法が必要なのかは明確ではありません。前者を仮定すると、scale_y_continuous()独自のブレークを定義するために使用できます。このようなものはあなたが望むことをするかもしれません（ほとんどの場合、いじる必要があります）：

plot1+ geom_hline(aes(yintercept=h)) + 
  scale_y_continuous(breaks = sort(c(seq(min(df$y), max(df$y), length.out=5), h)))

後者を仮定すると、これはおそらくあなたが望むものです：

plot1 + geom_hline(aes(yintercept=h)) +
  geom_text(aes(0,h,label = h, vjust = -1))

Answer 2

このようなものはどうですか？

plot1 + geom_hline(aes(yintercept=h), colour="#BB0000", linetype="dashed") + 
 geom_text(aes( 0, h, label = h, vjust = -1), size = 3)