如何修改ggplot2拉普拉斯密度函数图的曲线颜色并添加对应图例

首先给出完整可运行的实现代码：

# 未安装依赖包先执行下一行安装
# install.packages(c("ggplot2","rmutil"))
library(ggplot2)
library(rmutil)

# 请替换为你实际使用的参数值
beta_true <- 1
beta_fake <- 2

ggplot() + 
  geom_function(fun = function(x) dlaplace(x, m = 0, s = beta_true), aes(color = "beta_true")) + 
  geom_function(fun = function(x) dlaplace(x, m = 0, s = beta_fake), aes(color = "beta_fake")) + 
  expand_limits(x = c(-10, 10)) +
  labs(x = "Noise Range", y = "Probability", color = "Functions") +
  scale_color_manual(values = c("beta_true" = "pink", "beta_fake" = "purple"))

注意事项 #

• 你之前的写法逻辑是对的，没有出效果大概率是没有提前定义beta_true和beta_fake两个变量，导致密度函数运行报错，无法生成曲线
• 不需要重复设置expand_limits，一次即可
• 如果需要修改图例显示的标签，可以在scale_color_manual里新增labels参数自定义，不需要的话默认会显示aes中定义的beta_true、beta_fake文本

内容的提问来源于stack exchange，提问作者SssssssAaaaaaa