r - ggplot2を使用して散布図で2つの軸の交点を(1,1)に設定するにはどうすればよいですか

Question

私が欲しいのは、次の大ざっぱな図です。

Answer 1

2 つの交差する線が必要だと仮定していますgeom_vline()。geom_hline()

次に例を示します。

df <- data.frame(x=seq(-5,10), y=seq(-5,10))
qplot(x=x,y=y,data=df) + geom_vline(xintercept=1) + geom_hline(yintercept=1)

これにより、次のようになります。

Answer 2

元の軸をプロットから非表示にして、abline（）を使用して独自の軸を描画できます。

x <- rnorm(100,1)
y <- rnorm(100,1)

plot(x,y,axes=F)
abline(h=1)
abline(v=1)