# Load packageslibrary(tidyverse)library(tidycensus)library(mapgl)# Extract a data set to usedat <-get_acs(geography ="tract",variables ="B19013_001", # Median income,state ="WI",year =2022,geometry =TRUE ) |># Make an information columnmutate(Info =paste0(str_remove(NAME, ";.+$"), "<br>Median Income ($): ", round(estimate)) )maplibre() |># Focus the mapping areafit_bounds(dat) |># Fill with the data valuesadd_fill_layer(id ="mc_acs",source = dat,fill_outline_color ="black",fill_color =interpolate(column ="estimate",values =range(dat$estimate, na.rm =TRUE),stops =c("#f2d37c", "#08519c"),na_color ="gray" ),fill_opacity =0.50,popup ="Info" ) |>add_legend(legend_title ="Median income ($)",values =range(dat$estimate, na.rm =TRUE),colors =c("#f2d37c", "#08519c") )
Quarto for Reproducible Documents
Background
Quarto is an open source technical publishing system
Build custom analytical documents in programmatic way
Vehicle for dissemination, promoting automation and reproducibility
Integrates well with R, Python, and many other tools
This presentation (and website that it’s contained in) are built in Quarto
YAML (header/metadata)
---title:"The Value of Open-Source"subtitle:"Leveraging free, code-first tools to iterate toward advanced analytics"author:"Alex Zajichek"institute:"Research Data Scientist, Cleveland Clinic"date:"2025-02-27"date-format: longformat:revealjs:theme:[serif, custom.scss]footer:"<em>AI Innovations at Work Conference 2025</em>"slide-number:trueincremental:true---
Markdown (body)
### Background- [Quarto](https://quarto.org/) is a open source technical publishing system- Build documents, reports, websites, presentations, dashboards, books, etc.- Promotes automation and reproducibility
Shiny for Web Applications
Background
Shiny is an R package for building custom, interactive web applications