R 使用表达式（粘贴）将数学符号插入图例

我希望替换以下内容（是的，我在这里以TeX格式编写，只是为了清楚起见）

$P{M1}（\tilde{z}>z）-P{M0}（\tilde{z}>z）$

用于绿线的图例条目（cptsdtbehavioralm）和

$P{M2}（\tilde{z}>z）-P{M0}（\tilde{z}>z）$

用于蓝线的图例条目（fullbehavioralmodel）

以下是生成绘图的代码（我省略了10000个观测数据集和生成函数Fm0、Fm1和Fm2的转换）：

每当我试图用数学表达式替换“cptsdtbehavioralm”和“fullbehavioralmodel”——例如，为了保持简单，

表达式（p[{M1}]）

——我都会遇到以下类型的错误：

Error: unexpected '=' in:
"       theme(legend.key = element_blank()) +
   scale_color_manual(values = c(expression(P[{M1}]))="

---

我束手无策——任何见解或建议都将非常非常受欢迎。

下面是一个简单的示例，说明如何使用

值和
标签来获得我认为您想要的东西

请注意，
值
将数据中的值映射到您希望使用的颜色，而
标签
是您希望显示的标签（因此这是放置表达式的位置）

此示例非常不可复制。请创建一个小示例，以及返回错误的代码。此时，您似乎输入了错误的公式（过早地关闭括号），但那纯粹是猜测……非常感谢mnel——你确实看穿了我这个不完全透明的问题。我从这里和其他地方的许多其他示例和帖子中拼凑了代码。多亏了你，我的代码现在不仅可以工作，而且越来越清晰了！我会投票支持你，但我的经验太低了（这是我的第一篇帖子）。
Error: unexpected '=' in:
"       theme(legend.key = element_blank()) +
   scale_color_manual(values = c(expression(P[{M1}]))="

ggplot(data = data.frame(x= c(0,5)),aes(x=x)) +
    stat_function(fun=dnorm,aes(colour = 'red')) + 
    stat_function(fun = dexp, aes(colour = 'blue')) + 
    scale_colour_manual(values = c('red' = 'red','blue' = 'blue'),name = '', 
          labels = expression(P[M1](tilde(z)>0),P[M0](tilde(z)>0)))