scale_ill_gradient2中的非对称中点会在较短的边上产生修剪后的颜色

问题描述

以下是我尝试修改的开始示例：

library(reshape2)

data <- mtcars[, c(1,3,4,5,6,7)]
cormat <- round(cor(data),2)
melted_cormat <- melt(cormat, na.rm = TRUE)

ggplot(
  data = melted_cormat,
  aes(Var1, Var2, fill=value)
) +
  geom_tile() +
  geom_text(
    aes(Var2, Var1, label = value)
  ) +
  scale_fill_gradient2(
    low = 'red',
    high = 'blue',
    mid = 'white',
    midpoint = 0, # <-- look at this
    limit = c(-1, 1)
  )

此代码创建绘图：

但是当我将唯一的中点更改为midpoint = -0.5时，绘图如下：

在我看来，输出是不正确的，因为我清楚地说明了low = 'red'，并且在绘图中最低值的颜色在红色和白色之间。

我正在寻找如何保持midpoint = -0.5和从-1(红色)到-0.5(白色)的完全渐变的解决方案。

推荐答案

解决方案说明here：

library(reshape2)
library(scales)
data <- mtcars[, c(1,3,4,5,6,7)]
cormat <- round(cor(data),2)
melted_cormat <- melt(cormat, na.rm = TRUE)

ggplot(
  data = melted_cormat,
  aes(Var1, Var2, fill=value)
) +
  geom_tile() +
  geom_text(
    aes(Var2, Var1, label = value)
  ) +
  scale_fill_gradientn(
   colors=c("red","white","blue"),
   values=rescale(c(-1,-0.5,1)),
   limits=c(-1,1)
  )

这篇关于scale_ill_gradient2中的非对称中点会在较短的边上产生修剪后的颜色的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！