ggplotでのラベル付け

Question

ggplotの3つの折れ線グラフに各行の凡例を付けることができるようにするために、グラフ上でどの線が何かに関連付けられているかを知ることができます。ここに私の現在の設定があります：

ggplot(Months, aes(x = Month_Num)) + 
    geom_line(aes(y = A), colour = "blue") + 
    geom_line(aes(y = B), colour = "green") + 
    geom_line(aes(y = C), colour = "red")+ 
    ylab(label = "Total") + 
    xlab("Month Num") + 
    ggtitle("Total by Month Num") 

私はどのようにしてA、B、Cの凡例を作成できますか？おかげで、

Answer 1

私は、これはあなたが欲しいものだと思う：

df <- data.frame(month = 1:5, 
       A = 1:5, 
       B = 6:10, 
       C = 11:15) 

ggplot(df, aes(x = month)) + 
    geom_line(aes(y = A, col = "A")) + 
    geom_line(aes(y = B, col = "B")) + 
    geom_line(aes(y = C, col = "C")) + 
    ylab(label= "Total") 

Answer 2

あなたが長い

library(tidyverse) 
df %>% gather("var", "total", 2:4) %>% 
    ggplot(., aes(month, total, group = var, colour = var))+ 
    geom_line() 

に広いからデータを変換することによって、より短い方法でこれを行うことができます