Цвет точек на графике по-разному зависит от вектора значений

Я строю график ниже, используя функцию графика R. Это график вектора сдвига времени сдвига во времени. У меня есть другой вектор «интенсивность» значений интенсивности от ~ 3 до ~ 9. Я хочу раскрасить свои точки на графике на основе этих значений с помощью цветового градиента. В примерах я могу найти цвет на значении фактических построенных точек, поэтому в этом случае значения вектора 'shiftTime'. Можно ли использовать другой вектор, если соответствующие значения находятся в одном индексе?

Ответы на вопрос(3)

Чтобы добавить легенду к ответу Джорана в базе R:

legend("topleft",title="Decile",legend=c(1:10),col =rbPal(10),pch=20)

Этот пример добавляет ", cex = 0.8" только для красивости:

 Sergio12 мая 2017 г., 20:49
Как вы используете правильные значения в легенде аргумента? (не легенда = с (1:10)) ??
 Christophe D.16 нояб. 2018 г., 11:12
использованиеcut(dat$y,breaks = 10) чтобы получить правильные значения в легенде аргумента
 colin04 янв. 2017 г., 22:39
Как бы вы сделали эту легенду непрерывной цветной полосой исчезновения?

Решение с использованием ggplot2:

library(ggplot2)

#Some sample data
x <- sort(runif(100))
dat <- data.frame(x = x,y = x^2 + 1)
# Some external vector for the color scale
col <- sort(rnorm(100))

qplot(x, y, data=dat, colour=col) + scale_colour_gradient(low="red", high="blue")

Решение Вопроса

Вот решение с использованием базовой графики R:

#Some sample data
x <- runif(100)
dat <- data.frame(x = x,y = x^2 + 1)

#Create a function to generate a continuous color palette
rbPal <- colorRampPalette(c('red','blue'))

#This adds a column of color values
# based on the y values
dat$Col <- rbPal(10)[as.numeric(cut(dat$y,breaks = 10))]

plot(dat$x,dat$y,pch = 20,col = dat$Col)

 Broper01 дек. 2018 г., 19:53
Я чувствую, что это может быть довольно интуитивно понятно, но просто для пояснения, «10», используемый в палитре, относится к числу цветов в диапазоне. Это можно даже выделить и присвоить переменной для более настраиваемого графа.
 Climbs_lika_Spyder14 июл. 2015 г., 00:16
Это здорово! Как бы я показал легенду с этим?

Ваш ответ на вопрос