2017-01-23 6 views
4

の正確な右下隅(を参照するには実行)を決定、私はまさに私のプロットの右下隅に添付するabline()緑の垂直たいです。正確には私のプロットの右下に曲線最後があります。</strong>以下<strong>RプロットでRプロット

私のプロットにすべてをそのまま残して、この時点で正確なxとは何ですか? 以下の私のコードに見られるようpar("usr")[2]は助けることができなかった:

curve(df(x,1,28,ncp = 1.875),0,11,col="blue",lwd=3,ylim=c(0,1),xpd=T,bty="n",axes=F) 
curve(df(x,1,28), add=T,col="red",lwd=2) 
axis(1,pos=0) 
axis(2,pos=0) 

abline(v=par("usr")[2],col="green") ## I'm using par("usr")[2] here with no success ## 
+0

以下の答えほど良くはありませんが、プロットされているときにカーブの最大値を取得してt彼は終点を計算するために 'crv < - curve(df(x、1,28)、add = T、col =" red "、lwd = 2); – thelatemail

答えて

3

をデフォルトのプロットは、それぞれの側に4%の余分なスペースを追加します。だから、あなたが追加することによって、そのスペースを追加しない R を持つことができ右端ところで

に取得するには、メインプロットの大きさと

par("usr")[2]- 0.04*size 
11 

を取得するために

size = (par("usr")[2]-par("usr")[1])/1.08 
size 
11 

を計算することができますxaxs="i"を最初のカーブステートメントに合わせる

+0

'par()'に膨大な数の変数が与えられているのに、実際にはその点を逃す方法がないのは不思議です。とにかくニースの答え。 :-) – thelatemail