Hello, I tried to solve this but can not figure it out. Below is a reprex of my problem. I am expecting a ggplot bar plot but get an error saying the data is not found. Thank you in advance for your help!
#reprex 1 script
#install and load packages
pacman::p_load(rio, here, janitor, tidyverse, reprex, datapasta)
#import data
surv_raw <- data.frame(
stringsAsFactors = FALSE,
adm3_name_res = c(NA,"Mountain Rural",
"Mountain Rural","East II","West III"),
sex = c("m", "f", "f", "f", "f")
)
#clean the surveillance data
surv_clean <- surv_raw %>%
clean_names()
#make a horizontal bar plot of cases per district, filled by sex
ggplot(
data = Surv_clean,
mapping = aes(y = adm3_name_res, fill = sex))+
geom_bar()
#> Error: object 'Surv_clean' not found
#create a minimal dataset
#surv_raw %>%
#head(5) %>% #take the top 5 rows only
#select(adm3_name_res, sex) %>% #keep only the relevant columns
#dpasta() #convert to stand-alone R code