r - barplot（）列のカテゴリ数に基づいた棒のさまざまな色の灰色

Question

Rにデータフレームがあります。各データフレーム内には8つの変数があります。

1つの特定の変数の値に基づいて、バーにさまざまなグレーの色合いを割り当てたい棒グラフを作成したいと思います。

これが私が棒グラフを作成した方法です：

barplot(x$cov, names.arg = x$exon, 
    xlab = x$gene[1],
    ylab = "read depth" , 
    border = gray.colors(???))

変数エクソンは整数で構成されています。例えば：

0 0 0 0 1 1 1 2 2 3 3 3 3 4 4 4

だから私はすべてのバーを$exon = 01つの灰色の色合いにしたいすべてのバーを$exon = 1別の灰色の色合いにするなど...

誰かが私に手を差し伸べてもらえますか？

Answer 1

covまず、値を含む定義済みのサンプルデータフレームexon。

x<-data.frame(cov=sample(1:20,20),exon=rep(0:4,each=4))

例で見やすくなるため、col=代わりに引数を使用しました。border=

灰色のベクトルは、の一意の値の長さとして作成されますexon。次に、値[]に応じて各バーの色を選択するために使用されexonます。

barplot(x$cov, names.arg = x$exon, 
        ylab = "read depth" , 
        col = gray.colors(length(unique(x$exon)))[as.factor(x$exon)])