Как добавить символ звездочки в математическое выражение?

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, "**")))