meghall06/personal-website

My personal website, built with Quarto.

Hello! 👋

My name is Meghan (she/her), and I use & teach R, with a particular love for ggplot2 and quarto.

🏒  After many years of contributing to the public hockey analytics community, I now work full-time in sports analytics as the technical product manager of the hockey group at Zelus Analytics.

👩‍🏫  I love helping people learn R, particularly by teaching the tidyverse to beginners. I've given several talks and workshops, many focused on sports analytics and all available on my website, and in summer 2021, I taught the Statistical Graphics & Visualization course through the Department of Statistics & Data Science at Carnegie Mellon University. This course focused on data visualization using R and ggplot2, and the public-facing course website (built with distill) is here: cmu-36315.netlify.app.

I can be found on Twitter @MeghanMHall, and my website is here: meghan.rbind.io.

personal-website's Issues

Tips for custom parameterized issue ...

Hi Meghan,

First and foremost thanks for the great blog post. My R is good but my LaTeX is weak and your article was a great read. One quick suggestion...

You provide code that you say will produce all 9 reports (3 years * 3 species) but it actually doesn't do that...

purrr::map2(unique(penguins$species), unique(penguins$year), runpdfs)

will only make 3 pdfs.

Sticking with your current functions as is consider

crossed_list <-
  penguins %>% 
  expand(species, year) %>% 
  as.list()


purrr::walk2(
  crossed_list$species,
  crossed_list$year,
  runpdfs, 
  .progress = TRUE
)

I switched over to walk2 to avoid all the excess by product output as well instead of map2 turned on the progress bar inherent in the latest versions of purrr and if you hate as I do all the chattiness from knitting and weaving can modify your function very slightly:

runpdfs <- function(species, year) {
  quarto::quarto_render(
    "penguins.qmd",
    output_format = "pdf",
    execute_params = list(species = species, year = year),
    output_file = glue::glue("{species}_{year}.pdf"), 
    quiet = TRUE
  )
}

Thank you.

Not an issue, but just wanted to thank you for providing helpful resources on Quarto slides:

https://meghan.rbind.io/blog/quarto-slides/