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

Question

我想在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

我制作情节的代码是:

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
     ) +
     scale_y_continuous();

但结果是从1月到12月按月排序,而不是按照我的要求从4月到3月.我在scale_x_discrete中尝试过limit选项,但我认为这只是重新排序x轴标签,而不是真实数据.

请你帮助我好吗？

在此先感谢您的回答!

Answer 1

你必须重新排序因子水平Month.Name.假设df是你的data.frame:

df$Month.Name <- factor( df$Month.Name, levels = c( "Apr", "May", ..., "Feb", "Mar" ) )
g <- ggplot(data = df, aes(x = Month.Name, y = An) ) +
     geom_line(aes(group = Fiscal.Year, colour = factor(Fiscal.Year))) +    
     scale_x_discrete( name = "Month" ) +
     scale_y_continuous();

或者你可以改变Month.Number这样,4月是1,5月是2,依此类推......