r - 数式にアスタリスク記号を追加する方法は?

Question

R² 値と有意性コーディングでプロットに注釈を付けようとしていますが*、並置演算子ではなくシンボルとして渡すことができません。

私は試しました?plot.math、ここに私が試したものがあります

plot(1:10,1:10)
text(6,4,expression(R^2==8))
text(6,4,expression(R^2==8^{**}))
Error: unexpected '^' in "text(6,4,expression(R^2==8^{**"

Answer 1

式の中で使用する必要がありpasteます:

text(4,6,expression(paste(R^2==8^"**")))

また

text(6,4,expression(paste(R^2==8, "**")))