如何用ggplot2在兩條線之間繪製密度圖？

Question

我在學習R和ggplot2。我可以繪製單個可變函數（使用geom_path）和密度圖（使用geom_raster）。但是我找不到一種方法將它們結合起來，形成如下圖所示的圖形。這甚至可能與ggplot2？

Answer 1

當然。也許：

library(tidyverse) 

expand.grid(x = seq(0, 1, .001), # make a grid of x and y values 
      y = seq(0, 1, .001)) %>% 
    filter(y < x, y > x^2) %>% # filter to rows between curves 
    ggplot(aes(x, y, fill = x + y)) + 
    geom_raster() + 
    stat_function(fun = identity, color = 'red') + # add y = x 
    stat_function(fun = function(x){x^2}, color = 'red', linetype = 'dashed') + 
    scale_fill_gradient(low = 'black', high = 'white') + 
    coord_equal()