library(dplyr)
monty_hall <- monty_hall |>
mutate(decision = factor(decision, levels = c("stay", "switch")))
survey <- survey |>
mutate(organic_share = factor(organic_share, levels = 1:5, ordered = TRUE))
factor() marks a column as nominal, ordered = TRUE as ordinal, and numbers stay double or integer.