Closed davidhodge931 closed 4 months ago
library(tidyverse)
library(palmerpenguins)
library(ggblanket)
library(patchwork)
set_blanket()
p1 <- penguins |>
drop_na() |>
gg_violin(
x = species,
y = flipper_length_mm,
col = sex,
position = "dodge",
)
p2 <- penguins |>
drop_na() |>
gg_violin(
x = species,
y = flipper_length_mm,
col = sex,
position = "dodge",
mode = light_mode_r(axis_line_colour = "#78909C")
)
p1 / p2
Created on 2024-06-01 with reprex v2.1.0
Can't be bothered - leave as is
Created on 2024-06-01 with reprex v2.1.0