Caffeine Drink Types

Quarto enables you to weave together content and executable code into a finished document. To learn more about Quarto see https://quarto.org.

When you click the Render button a document will be generated that includes both content and the output of embedded code. You can embed code like this:

You can add options to executable code like this # {}

### Column {width=30%}

This dashboard focuses on caffeine intake and it’s affect on college focus levels and mental health.

##Row This plot displays average amount of caffeine present in 6 different caffeinated drinks. The water category represents drinks made through caffeinated powders that are mixed with water. This data was downloaded from [Kaggle] (https://www.kaggle.com/datasets).

#Consumption of Caffeine Drink Types

summary_data <- drink_type|>
  group_by(drink_type) |>
  summarize(
    avg_caffeine = mean(caffeine_mg, na.rm = TRUE),
    avg_focus = mean(focus_level, na.rm = TRUE)
  )

#Average Focus Level by Caffeine Drink Type

ggplot(summary_data, aes(x = reorder(drink_type, avg_focus), y = avg_focus, fill = drink_type)) +
  geom_col() +
  labs(
    title = "Average Focus Level by Caffeine Drink Type",
    x = "Drink Type",
    y = "Average Focus Level"
  ) +
  theme_minimal()