Я делаю точечный график с плотной цветовой кодировкой с этим кодом:
d1 = densCols(newData_cut,
colramp = colorRampPalette(c("navy
blue","yellow","firebrick","firebrick"),
space = "Lab"))
ggplot(newData_cut) +
geom_point(aes(x=green, y= blue, col = d1), size = 1) +
xlim(0, 0.4)+
ylim(0,2)
Но когда я получаю изображение, оно выглядит так:
Может ли кто-нибудь помочь мне построить правильную легенду с цветом, представляющим количество / плотность точек?
> dput(head(newData_cut))
structure(list(green = c(0, 0.229804, 0, 0, 0, 0), blue = c(0.080264,
0.204474, 0.04059, 0.040284, 0.042421, 0.041505), width = c(1317,
4529, 1, 10, 23, 5)), .Names = c("green", "blue", "width"), row.names =
c(NA,
6L), class = "data.frame")