Reprex student practice- don't reply

General
1 
library(tidyverse)
ggplot(data = mtcars, 
       mapping = aes(x = cyl, y = mpga)) +
  geom_col()
#> Error in `geom_col()`:
#> ! Problem while computing aesthetics.
#> ℹ Error occurred in the 1st layer.
#> Caused by error:
#> ! object 'mpga' not found

list.files()
#> [1] "frail-tick_reprex.R"        "frail-tick_reprex.spin.R"  
#> [3] "frail-tick_reprex.spin.Rmd"
library(tutorial.helpers)
show_file("script.R")
#> Error in `show_file()`:
#> ! File does not exist.
data()
library(reprex)
search()
#>  [1] ".GlobalEnv"               "package:reprex"          
#>  [3] "package:tutorial.helpers" "package:lubridate"       
#>  [5] "package:forcats"          "package:stringr"         
#>  [7] "package:dplyr"            "package:purrr"           
#>  [9] "package:readr"            "package:tidyr"           
#> [11] "package:tibble"           "package:ggplot2"         
#> [13] "package:tidyverse"        "package:stats"           
#> [15] "package:graphics"         "package:grDevices"       
#> [17] "package:utils"            "package:datasets"        
#> [19] "package:methods"          "Autoloads"               
#> [21] "tools:callr"              "package:base"
2

use mpg in stead of mpga:

library(tidyverse)
ggplot(data = mtcars, 
       mapping = aes(x = cyl, y = mpg)) +
  geom_col()