Rのplotで軸上に点を重ねる方法

散布図をRで作成する場合は、たいてい

x<-c(0,10,20,30,40,50,60,70,80,90,100)
y<-c(10,30,45,51,63,72,88,90,100,130,140)plot(x,y,xlim=c(0,100), ylim=c(0,150))
plot(x,y,xlim=c(0,100), ylim=c(0,150))

というようなプログラムを書く。実行すると以下のような散布図が出力される。
rplot01
でも、論文によっては「原点で交差するように」という指示があるかもしれない。そこでこんなことをしてみよう。

par(xaxs="i",yaxs="i")
plot(x,y,xlim=c(0,100), ylim=c(0,150))

rplot02
あれ、○がちょんぎれちゃった! Excelのように、○を軸の上に重ねなさい、という指示をされた場合にはどうするか?

par(xaxs="i",yaxs="i",xpd=T)
plot(x,y,xlim=c(0,100), ylim=c(0,150))

これでいける。IMOさんありがとうございました。
rplot03