Happy Halloween 2018

My latest baking adventures for a Halloween party today:

raw_ingredients %>% 
   mix() %>% scoop() %>% 
   bake(oventemp=350F, time=20mins) %>%
   cool(time=30mins) %>%
   ggplot() + 
      geom_cupcake() + geom_frosting() +
      geom_oreos() + geom_milk_duds() +
      geom_reeses_pieces()