带有变量的mtext中的上标

Question

我希望在mtext中包含一个变量以及上标一些文本：

我理想的输出是

y.label ADC (10^-6 mm^2/s) 

其中y.label是变量的值， -6 是上标的， 2 是上标

迄今为止最有希望的方法是：

mtext(expression(paste(y.label, " ADC (", 10^-6, " ", mm^2, "/s)")), side=2, line=2.5, cex=1.2, font=1)

这几乎可以工作，但输出“y.label”而不是y.label

的值

感谢任何建议。

Answer 1

这应该有效：

y.label <- 1
plot(1:10,1:10, type = "n", ylab = "")
gaa <- parse(text=paste(y.label, "*~ADC(10^-6*~mm^2/s)"))
mtext(gaa, side=2, line=2.5, cex=1.2, font=1)

有关说明，请参阅here

由于％符号，

编辑解析怪胎。您可以使用substitute代替。在这里，您必须通过列表/环境将y.label传递给函数。请参阅帮助表。

y.label <- "PVP 10%"
gaa <- substitute(paste(N, " ADC (", 10^-6, " ", mm^2, "/s)"), list(N=y.label))
plot(1:10,1:10, type = "n", ylab = "")
mtext(gaa, side=2, line=2.5, cex=1.2, font=1)