2

私はデータ視覚化プロジェクトに取り組んでおり、いくつかの折れ線グラフを作成しています。これは私のデータセットです:

groupA <- read.csv("afcongroupA.csv", header=T, row.names=NULL)
groupA
    Date               Team Position
1   1/12       South Africa       56
2   1/12             Angola       85
3   1/12            Morocco       61
4   1/12 Cape Verde Islands       58
5   4/12       South Africa       71
6   4/12             Angola       78
7   4/12            Morocco       62
8   4/12 Cape Verde Islands       76
9   8/12       South Africa       67
10  8/12             Angola       85
11  8/12            Morocco       68
12  8/12 Cape Verde Islands       78
13 12/12       South Africa       87
14 12/12             Angola       84
15 12/12            Morocco       72
16 12/12 Cape Verde Islands       69

次に、それらを折れ線グラフにプロットして、順位の下落の上昇を示しました。

groupA$Date <- factor(groupA$Date, levels=groupA$Date[!duplicated(groupA$Date)])
ggplot(groupA, aes(x=Date, y=Position, colour=Team, group=Team)) + geom_line()

私がやりたいことは、最大数が下になるようにy軸を逆にすることです。私はこのコードを試しました：

groupA <- coord_flip() + scale_x_reverse()

しかし、次のエラー メッセージが表示されます。

Error in coord_flip() + scale_x_reverse() :

二項演算子への非数値引数

OS X を実行している Mac で R 2.15.2 を使用しています。

4

1 に答える 1

2

あなたの列Dateは要因であるため、機能しscale_x_reverse()ません。1つの解決策は、データフレームで因子のレベルを順序付けることです

groupA$Date <- factor(groupA$Date, levels=rev(unique(groupA$Date)))

次に、コードを使用してプロットを作成し、軸を反転します。

ggplot(groupA, aes(x=Date, y=Position, colour=Team, group=Team)) +
      geom_line()+coord_flip()
于 2013-01-21T10:13:30.817 に答える