如何在ggplot2中的希腊字母的上标中写一个星号（*）符号？

Question

参考下图，我想在Xlab中写出Δ*而不是Δ。我在R代码中使用了以下行。

g=ggplot(SS4, aes(x = Delta, y = SRE, group = Estimators, colour = Estimators)) + geom_line(size=1.1)+xlab(expression(Delta))+ theme(legend.position="none",axis.text=element_text(size=12))
direct.label(g, list(first.points, hjust = 1.1,vjust = 1)).

我应该如何修改xlab(expression(Delta))，以便我能够写出Δ*？我试过了xlab(expression(Delta^{*}))，但它没有用。

Answer 1

在表达式（）

中使用paste（）

xlab(expression(paste(Delta, "*")))