Я пытаюсь создать график в ggplot2 с цветным градиентом внутри каждого значения x, чтобы выделить третью переменную в 2d графике. Я пробовал это, но безуспешно:
d = data.frame('y' = sample(0:10, 20, T), 'x' = sample(1:2, 20, T), 'z' =
sample(0:100, 20) )
colfunc <- colorRampPalette(c("black", "white"))
d = d[order(d$z),]
d$color = NA
for (i in seq(length(unique(d$x)))) {
d[d$x %in% unique(d$x)[i] ,]$color=colfunc(nrow(d[d$x %in% unique(d$x)[i],]))
}
ggplot2::ggplot(d, aes(x=x, y=y))+geom_point(aes(colour = color))