小编Alb*_*ero的帖子

ggplot逐年比较

我想制作一个比较不同年份获得的数据的图.目标是在x轴上12个月,用每年的值绘制不同的线.

我正在使用的数据框是下一个:

   Month             Marg            Fiscal.Year
1  2009-04-01        20904494        2009
2  2009-05-01        43301981        2009
3  2009-06-01        14004552        2009
...
38 2012-05-01        58343271        2012
39 2012-06-01        38723765        2012
40 2012-07-01        77246753        2012
Run Code Online (Sandbox Code Playgroud)

我的情节代码是:

g <- ggplot(data = data, stat="identity", aes(x = Month, y = Marg)) + 
  geom_line() +
  geom_point() +
  geom_smooth(method = "loess") +
  scale_x_date(breaks = "1 month", labels = date_format("%b"));
Run Code Online (Sandbox Code Playgroud)

但这是从2009年到2012年48个月x轴图,其中一行显示了每个值(每个月的每年不同的线).

你能帮我解决这个问题吗?(我是R的新人,任何帮助将不胜感激).

在此先感谢您的回答!

r ggplot2

5
推荐指数
1
解决办法
4847
查看次数

重新排序月份导致x轴(ggplot)

我想在x轴上生成一个带有重新排序月份的图(不是从1月开始到12月结束,我想从4月开始到3月结束).

我的数据类似于:

          Month         An              Fiscal.Year Month.Number Month.Name
    1     2009-04-01    40488474        2009        4            Apr
    2     2009-05-01    53071971        2009        5            May
    3     2009-06-01    24063572        2009        6            Jun
    ...
    44    2012-11-01    39457771        2012        11           Nov
    45    2012-12-01    44045572        2012        12           Dec
    46    2013-01-01    90734077        2012        1            Jan
Run Code Online (Sandbox Code Playgroud)

我制作情节的代码是:

g <- ggplot(data = data, aes(x = Month.Number, y = An)) +
     geom_line(aes(group = Fiscal.Year, colour = factor(Fiscal.Year))) +    
     scale_x_discrete(
       name = "Month", 
       breaks = data$Month.Number,
       labels = data$Month.Name …
Run Code Online (Sandbox Code Playgroud)

r

4
推荐指数
1
解决办法
3740
查看次数

标签 统计

r ×2

ggplot2 ×1