gg <- ggplot(df_melt, aes(x=date)) # setup gg + geom_line(aes(y=value, color=variable), size=1) + scale_color_discrete(name="Legend") # gets legend. Line chart ...
確定! 回上一頁