2012-02-06 15 views
2

plot()を使用してXY-プロットの2番目の線を、この例のような異なるスケール(紫色の線)にプロットするにはどうすればよいですか?XY-プロット上の複数の軸/スケールR

enter image description here

最初(赤)のラインのための私のRコードのようなものである:ここでは

p <- sqlQuery(ch,"SELECT wl,param1 FROM qryPlot ORDER BY wl") 
plot(p$wl,p$param1,axes=T,xlim=c(400,800),ylim=c(0,100),type="l",col="red") 
+0

私はこれも前に対処されていると思います。私は他のQ/Asを見つけようとします... –

+3

http://stackoverflow.com/questions/5479822/plotting-4-curves-in-a-single-plot-with-3-y-axes-in- r http://stackoverflow.com/questions/6142944/how-can-i-plot-with-2-different-y-axes-in-r –

+0

また、R-FAQにも記載されています。 –

答えて

8

一般的な考え方です:

plot(1:10) 
par(new=T) 
plot(1:10, rep(50, 10), type='l', axes=F, xlab=NA, ylab=NA) 
axis(4) 

enter image description here

0

私は少し@johncolbyによる答えを次のように拡張しました:解決する

enter image description here

小さな問題:

x<-1:20 
y1<-sqrt(x) 
y2<-sqrt(x)*x 
plot(x,y1,ylim=c(0,25),col="blue") 
par(new=TRUE) 
plot(x,y2,ylim=c(0,100),col="red",axes=FALSE) 
axis(4) 
この結果と

(第2のプロットでaxes=FALSE()コマンド=ラベルを左側に印刷された第2の軸を防止するために)ラベル両方のy軸が左側に印刷されます。

関連する問題