Резкий разрыв в цветовой палитре в т - PullRequest
2 голосов
/ 08 августа 2011

Я создаю цветовую палитру со следующим кодом:

library(rgl)
fv.colors = colorRampPalette(c("white","tan4","green"))
colorlut = terrain.colors(100)[c(100,95,90,85,80,75:30,25,20,15,14:1)]
col = colorlut[fv-trnlim[1]+1 ]

, который дает это: (цветная полоса была создана в соответствии с предоставленным кодом здесь )

enter image description here

Вместо этого я хотел бы получить полосу белого цвета в точке 0, как у меня сейчас, но затем чистый разрыв в точке 0,01, где палитра будет начинаться в "tan4 ", а не то, что он делает сейчас, то есть постепенно переходить от белого к" tan4 "(фактически, ни в коем случае он не становится таким темным, как tan4).

Извиняюсь, если это очень простой ответ, но после многих попыток и большого количества поиска в Google, я все еще не могу понять это.

Спасибо!

1 Ответ

5 голосов
/ 08 августа 2011

Небольшая модификация вашего кода, кажется, дает ответ, который вы после:

fv.colors = colorRampPalette(c("white","tan4","green")) ## define the color ramp
colorlut = fv.colors(100)[c(1,seq(50,100,length.out=99))] ## select colors to use
plot(0:1,0:1,type='n',xaxs='i',yaxs='i') ## define the plotting area
## illustrate the vector of colors using rectangles
rect(seq(0,0.99,0.01),rep(0,100),seq(0.01,1,0.01),rep(1,100),col = colorlut,border = NA)
box() ## make sure that the graph's frame is not covered up

Редактировать: Цвета немного уродливы для меня, но вы можете отрегулировать это, переопределив цветовую шкалу или выбрав цвета из рампы.

Example of the colour chart

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...