2017-01-13 21 views
0

私のプロットに凡例を追加しようとすると、以前に計算したフィッティングパラメータが表示されるはずであり、添字と各パラメータの新しい行は見えません伝説を作るsubstitute()paste()を一緒にします。 legend()は常にargument "legend" is missing, with no defaultで壊れているようです。明らかにsubstitute()は新しい行を作成することができません。は、人間が判読可能な「bottomright」のパラメータlegend()と比べて少し面倒です。凡例を下付き文字でプロットし、Rを格納する値を入れようR

これは私の知る限り得ているようです:

paramX = 1234 
paramY = 9876 

plot.new() 

legend("bottomright", 
     bty = "n", 
     paste("x[max] = ", paramX, 
      "\ny[max] = ", paramY) 
) 

答えて

2
paramX = 1234 
paramY = 9876 

plot.new() 

expr <- vector("expression", 2) 
expr[[1]] <- bquote(x[max]==.(paramX)) 
expr[[2]] <- bquote(y[max]==.(paramY)) 

legend("bottomright", 
     bty = "n", 
     legend = expr) 

プロットこの結果:

resulting plot

関連ドキュメント:help("legend"); help("plotmath"); help("bquote")

最も難しい部分は、2つのbquoteの表現を1つの発現ベクターに組み合わせることです。

関連する問題