search

davidhodge931 / ggblanket

Simplify ggplot2 visualisation
https://davidhodge931.github.io/ggblanket/
Other
150 stars 8 forks source link

docs ggdist #865

Closed davidhodge931 closed 3 months ago

davidhodge931 commented 3 months ago 
library(ggdist)
library(distributional)

tibble(x = 1:10) |> 
  group_by(across(everything()))  |> 
  do(tibble(y = rnorm(100, .$x))) |> 
  median_qi(.width = c(0.5, 0.8, 0.95)) |>
  mutate(.width = factor(.width)) |>
  gg_blanket(
    geom = "lineribbon",
    x = x,
    y = y,
    ymin = .lower,
    ymax = .upper,
    col = .width,
    colour = viridis::mako(n = 9)[c(1)],
    col_legend_rev = TRUE,
    col_palette = viridis::mako(n = 9)[c(5,7,9)], 
  )