r - 虹色の伝説r

Question

レインボー オプションを使用して R プロットの凡例を作成しようとしていますが、いくつかの問題に直面しています。

私はプロットします

plot(test$a,test$b, col = rainbow(length(test$s))[rank(test$s)])

test$s に従って色が割り当てられます。問題は、データ フレーム テストの多くの値に対して test$s が等しいことです。

    legend('topright',legend=test.sub$s,col=rainbow(length(test.sub$s))
[rank(test.sub$s)])

凡例に test$s のすべての複製が表示されますが、色は正しいです。私が書いた重複を望まないので

    legend('topright',legend=unique(test.sub$s),col=rainbow(length(test.sub$s))
[rank(test.sub$s])

しかし、すべての色がめちゃくちゃです！

前もって感謝します

Answer 1

問題はunique(test.sub$s)、 と同じ長さではないことですrainbow(length(test.sub$s))[rank(test.sub$s]。私の解決策は次のとおりです。

col=rainbow(length(test.sub$s))[rank(test.sub$s)[!duplicated(test.sub$s)]]