Changed geom_smooth() to geom_point() to maintain consistency with geometric object function name in the code block below.
Changed meal_type to meal_plan to maintain consistency with the variable name in the data/code.
vignette(pivot, package = "tidyr") should be changed to vignette("pivot", package = "tidyr") The former code produces an "object not found" error as vignette does not quote its arguments.