R：使用ggplot时不显示图例

我想为情节添加一个图例。然而，什么也没有出现。我看过其他类似的问题，但似乎没有一个能解决我的问题

这是代码的那一部分

ggplot(lm_model, aes(x=year, y=pred_price)) +
  geom_point(color="red") +
  geom_line(color="red") +
  geom_line(aes(x=year, y=real_price)) +
  labs(title="Linear Regression",
       x="Year",
       y="Gas Price") +
  scale_color_manual(labels = c("Predicted", "True Value"))

下面是使用此代码（以及您可以看到的没有图例）时输出的外观：

---

这可以工作，但没有测试，因为没有共享数据。您需要将颜色语句移动到aes（）中。：

库（ggplot2）
#资料
lm_模型这可以工作，但没有测试，因为没有共享数据。您需要将颜色语句移动到aes（）中。

：

库（ggplot2）
#资料
lm_模型太棒了！然而，传说的标题是“颜色”。我怎么能把它改成零呢？i、 e.没有图例标题。@Joehat我已经按照您的意愿更新了代码，还添加了一些虚拟数据。让我知道这是否有效！明亮的然而，传说的标题是“颜色”。我怎么能把它改成零呢？i、 e.没有图例标题。@Joehat我已经按照您的意愿更新了代码，还添加了一些虚拟数据。让我知道这是否有效！
library(ggplot2)
#Data
lm_model <- data.frame(year=2010:2020,
                       pred_price=runif(11,0,75),
                       real_price=runif(11,0,75))
#Code
ggplot(lm_model, aes(x=year, y=pred_price)) +
  geom_point(aes(color="red")) +
  geom_line(aes(color="red")) +
  geom_line(aes(x=year, y=real_price,color='black')) +
  labs(title="Linear Regression",
       x="Year",
       y="Gas Price") +
  scale_color_manual(labels = c("Predicted", "True Value"),
                     values=c('black','red'))+
  labs(color='Price')