5

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

しかし、結果は、私が望むように4月から3月ではなく、1月から12月までの月ごとに並べられたプロットです。scale_x_discrete 内で limits オプションを試してみましたが、これは実際のデータではなく、x 軸のラベルを並べ替えるだけだと思います。

手伝っていただけませんか？

ご回答ありがとうございます。

4

2 に答える 2

5

の因子レベルを並べ替える必要があり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 などのように変更することもできます...

于 2012-11-25T21:11:42.690 に答える
2

プロットする前に実行してください：

data$Month.Number <- ((data$Month.Number+8) %% 12) + 1
于 2012-11-25T21:26:17.280 に答える