Легенда с цветами радуги R

Question

Я пытаюсь создать легенду для сюжета R с опцией радуги, но я столкнулся с некоторыми трудностями.

I участок

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

с цветом, назначенным в соответствии с тестовыми $ с. Проблема заключается в том, что тест $ s равно для многих значений теста кадра данных, так что если чем я пишу

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

я получаю в легенде всех дубликаты тест $ 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)]]