反转默认比例渐变ggplot2

Question

我是新手，我正在尝试设计热图。 这是我的代码：

ggplot(gd, aes(Qcountry, Q6_1_Q6d), order = TRUE) +
  geom_tile(aes(fill = prob), colour = "white") +
  theme_minimal() +
  labs( y = "Main reason for mobility", x = "Country") +
  theme(axis.text.x = element_text(angle = 90, hjust = 1, vjust = 0.3)) +
  scale_fill_gradient(name = "(%)")

这产生了一个完美的图表，我的问题是低级别是深蓝色，高值是浅蓝色，这不直观。 最常见的方法是使用rev() 。 但就我而言，我不知道该怎么做。 那么，是否可以反转这个默认比例？ 这就是传说

另一个问题，有没有办法只用一种颜色创建缩放渐变。 我的意思是， scale_fill_gradient/scale_fill_gradientn需要设置低色和高色(low = "", high = "") ，我想将蓝色改为红色。

十分感谢您的支持。

Answer 1

?scale_colour_gradient显示low = "#132B43"和high = "#56B1F7"的默认值。

只需切换那些：

ggplot(faithfuld, aes(waiting, eruptions)) +
    geom_raster(aes(fill = density)) +
    scale_fill_continuous(high = "#132B43", low = "#56B1F7")

就个人而言，我认为这不如默认设置直观。

---

或者，您可以使用反向比例，但这也会翻转图例以从顶部开始：

ggplot(faithfuld, aes(waiting, eruptions)) +
    geom_raster(aes(fill = density)) +
    scale_fill_continuous(trans = 'reverse')

Answer 2

您可以使用RColorBrewer （链接）库中的调色板并指定颜色渐变的方向

library(RColorBrewer)
library(ggplot2)

ggplot(df, aes(x, y)) +
  geom_tile(aes(fill = z, width = w), colour = "grey50") +
  scale_fill_distiller(palette ="RdBu", direction = -1) # or direction=1


# data
  df <- data.frame( x = rep(c(2, 5, 7, 9, 12), 2),
                    y = rep(c(1, 2), each = 5),
                    z = rep(1:5, each = 2),
                    w = rep(diff(c(0, 4, 6, 8, 10, 14)), 2))