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

Question

说我有情节

plot(1:10,1:10)

我想添加y轴标签

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

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

我尝试过 ?mathplot，并尝试使用谷歌搜索，但只能找到表达式位于文本字符串末尾的答案，而不是将表达式夹在文本之间。因此，这不是 thread 的副本。我试过做诸如表达式（粘贴（...））之类的事情，但没有奏效。

Answer 1

致电bquote 应该适合您：

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

另外，正如我们在 cmets 中所讨论的，如果您对 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"))

这有帮助吗？