0

Rで積み上げ棒グラフをプロットすることについてのマイナーな質問。積み上げ棒グラフは、シリーズを下から上に表します。ただし、凡例には常にシリーズが上から下に表示されます。それはggplot2::geom_bar

いずれかまたは次のようにrev(...)2回使用するよりも優れたイディオムはありますか？legend()barplot()

exports <- data.frame(100*rbind('Americas'=runif(6),'Asia'=runif(6),'Other'=runif(6)))
colnames(exports) <- 2004:2009
series_we_want <- c(1,2,3)
barplot( as.matrix(exports[series_we_want,]), col=mycolors, ...)
legend(x="topleft", legend=rev(rownames(exports)[series_we_want]), col=rev(mycolors) ...)

（出力の1つを省略した場合、rev()'s明らかに意味がありません。単一のフラグを追加するための拡張ケースのようですyflip=TRUE。yreverse=TRUE）

4

1 に答える 1

1

これは私があなたのコードを使って得たものです：

exports <- data.frame(100*rbind('Americas'=runif(6),'Asia'=runif(6),'Other'=runif(6)))
colnames(exports) <- 2004:2009
series_we_want <- c(1,2,3)
barplot( as.matrix(exports[series_we_want,]))
legend(x="topleft", legend=rev(rownames(exports)[series_we_want]))

ここに画像の説明を入力してください

これを試して：

exports <- data.frame(100*rbind('Americas'=runif(6),'Asia'=runif(6),'Other'=runif(6)))
colnames(exports) <- 2004:2009
series_we_want <- c(1,2,3)
test_data<-as.matrix(exports[series_we_want])

 barplot( test_data, 
          legend.text=as.character(rev(rownames(exports)[series_we_want])), 
           args.legend = list(x="topleft"))

あなたが持っているものとは逆の順序で伝説を生み出すようです

ここに画像の説明を入力してください

于 2012-05-10T02:12:05.733 に答える