| x <- seq(-4,4,0.01) y <- dnorm(x) plot(x,y) arrows(-4,0,4,0) text(-4,0.05,"左端") text(4,0.05,"右端") #arrows(x0,y0,x1,y1) #始点の座標 (x0,y0) と,終点の座標 (x1 ,y1) を通る矢印を描く #text(x, y, labels) #座標 (x,y) にラベルが描かれる.座標値と文字列をベクトルで指定することも出来 #text の引数に srt = -(回転角) を入れることで,プロットの x 軸ラベルを45度回転させることが出来る. #source:ttp://cse.naro.affrc.go.jp/takezawa/r-tips/r/51.html |