Show code
# | echo: true
# | eval: false
# | warning: false
# | message: false
if(!(require(tidyverse))){install.packages("tidyverse"); library(tidyverse)}
if(!(require(CustomGGPlot2Theme))){install.packages("CustomGGPlot2Theme"); library(CustomGGPlot2Theme)}
if(!(require(patchwork))){install.packages("patchwork"); library(patchwork)}
sfi_grants <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/main/data/2026/2026-02-24/sfi_grants.csv')