ベースRプロットで凡例の名前をイタリックにする方法はありますか？

Question

という凡例の名前だけが斜体で表示されているプロットに凡例を追加したい。私はしかし、私はイタリック体のラインが変数の番号が含まれていることを必要とするので、私はbquoteを使用し、ベースR.中plot()

• を使用しています。

私が試したことは動作しません：私は（RIGHT LEGEND）独自に表現を残したときに、それが正しく斜体こと

a <- 2 ; b <- 5 
    plot(a,b) 
    l1 <- bquote(Italic ~ .(a) + .(b)) 
    l2 <- bquote(a + b) 
    legend(x='topright',legend = bquote(italic(.(l1)))) 
    legend(x='topleft',legend = c(bquote(italic(.(l1))),l2)) 

• お知らせ。しかし、私が他の凡例の行にテキストを追加すると、それが崩れてしまいます（LEFT LEGEND）。

私はこれを適切にどのように行うのですか？

^{注：がでない場合は、legend()を複数回呼び出す必要があります。}

Answer 1

あなたはtext.font = 3を使用することができ、言う：

legend(x='topleft',legend = c(bquote((.(l1))),l2), text.font=c(3,1)) 

Answer 2

あなたが表現オブジェクトにすべてを強制するためにas.expressionを使用する必要があります。

a <- 2 
b <- 5 
plot(a,b) 
legend("topleft", legend = c(as.expression(bquote(italic("Italic: "*.(a)*" + "*.(b)))), 
    as.expression(bquote("Non Italic: "*.(a)*" + "*.(b))))) 

あなたはイタリック体の欲しいもののラインを指定するtext.fontの=のC（3,1）を使用し、その後

a <- 2 
b <- 5 
plot(a,b) 
l1 <- bquote(Italic ~ .(a) + .(b)) 
l2 <- bquote(a + b) 
legend("topleft", legend = c(as.expression(bquote(italic(.(l1)))), 
          as.expression(bquote(.(l2)))))