如何在R中，在文本块之间，用符号制作下标

Question

说我有情节

plot(1:10,1:10)

我想添加y轴标签

'this is text where I write the variable', sigma^*, 'in my favorite units'

Sigma star应该尽可能接近乳胶代码$ \ sigma ^ * $。

我试过了吗？mathplot，并尝试使用Google搜索，但只能找到答案，其中表达式位于文本字符串的末尾，并且反对将表达式夹在文本之间。因此，这不是thread的重复。我尝试过像表达式（粘贴（...）），但是没有用。

Answer 1

致电bquote应该对您有用：

plot(1:10,1:10,ylab=bquote("this is text where I write the variable" ~ sigma^"*" ~ "in my favorite units"))

另外，正如我们在评论中所讨论的那样，如果您对bquote创建的星号的形状不满意，您的选项有些限制......我对一个简单解决方案的最佳猜测是切换到另一种字体，像这样：

plot(1:10,1:10,ylab=bquote("this is text where I write the variable" ~ sigma^symbol("*") ~ "in my favorite units"))

或绘制aterix符号而不将其放在指数中，但是你开始远离乳胶渲染$ \ simga \ ^ {*} $：

plot(1:10,1:10,ylab=bquote("this is text where I write the variable" ~ sigma ~ "*" ~ "in my favorite units"))

帮忙吗？