我在寻找一种方式来舒展两个值之间的渐变色和标签的传说,无论在数据集中的数据值的范围。 从本质上讲,是有功能上等同的ylim()
为颜色渐变?
定的代码,其通常绘制在-1和1之间的z值,我可以绘制和标记的梯度,如果中断是数据范围内:
library(ggplot2)
#generator from http://docs.ggplot2.org/current/geom_tile.html
pp <- function (n, r = 4) {
x <- seq(-r * pi, r * pi, len = n)
df <- expand.grid(x = x, y = x)
df$r <- sqrt(df$x^2 + df$y^2)
df$z <- cos(df$r^2) * exp(-df$r / 6)
return(df)
}
t <- pp(30)
summary(t)
b <- c(-.5, 0, .5)
colors <- c('navyblue', 'darkmagenta', 'darkorange1')
p <- ggplot(data = t, aes(x = x, y = y))+
geom_tile(aes(fill = z))+
scale_fill_gradientn(colors = colors, breaks = b, labels = format(b))
ggsave(plot = p, filename = <somefile.png>, height = 3, width = 4)
但是,当我改变观测范围之外的休息时间值,渐变色似乎没有调整和梯度标签不会出现。
b <- c(-3, 0, 3)