library(tidyverse)manufacturers <- mpg |> mutate(manufacturer = str_to_title(manufacturer))