代码之家  ›  专栏  ›  技术社区  ›  Joehat

R: 使用ggplot时不显示图例

  •  0
  • Joehat  · 技术社区  · 4 年前

    我想加上一个情节的传说。然而,什么也没有出现。我也看过其他类似的问题,但似乎没有一个能解决我的问题。

    这是代码的那一部分。

    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"))
    

    enter image description here

    1 回复  |  直到 4 年前
        1
  •  1
  •   Duck    4 年前

    这可以工作,但不能测试,因为没有数据共享。你需要把颜色声明移到里面 aes() :

    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')
    

    输出:

    enter image description here