積み重ねられたバープロットは、凡例の反対の順序ですか？

Question

積み重なった棒グラフをRにプロットすることに関する小さな疑問。 積み重なった棒グラフは、下から上へのシリーズを表します。 しかし、凡例には常にシリーズの上から下へが表示されます。あなたのいずれかを省略した場合（

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) ...) 

：私はのようなことがggplot2::geom_bar

でも真であるlegend()またはbarplot()のいずれかの内側に二回rev(...)を使用するよりも任意のよりよいイディオムがあると思いますrev()'s出力は明らかに無意味です。単一のフラグを追加するための機能強化のようです。yflip=TRUEまたはyreverse=TRUE）

Answer 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")) 

はで伝説を作るように見えますあなたが持っているものの逆の順序