pacman::p_load(
rio, # for importing data
here, # for relative file paths
skimr, # for reviewing the data
janitor, # for cleaning data
epikit, # for creating age categories
tidyverse,
datapasta,
reprex,styler
)
#data
events_raw<-data.frame(
EMS = c("2017-E000240","2017-E000203",
"2021-E000145","2018-E000350","2020-E000102",
"2023-E000309","2017-E000318","2018-E000116"),
Grade = c("Ungraded","Ungraded",
"Ungraded","Ungraded","Protracted 3","Grade 2","Ungraded",
"Ungraded"),
Status = c("Closed","Closed","Closed",
"Closed","Closed","Closed","Closed","Closed"),
Country = c("Algeria","Algeria","Algeria",
"Algeria","Algeria","Algeria","Algeria","Algeria"))
event_clean<- events_raw %>%
clean_names() %>%
mutate(grade=na_if(Grade, " "))
#> Error in `mutate()`:
#> βΉ In argument: `grade = na_if(Grade, " ")`.
#> Caused by error:
#> ! objet 'Grade' introuvable
Created on 2024-03-06 with reprex v2.1.0
Session info
sessionInfo()
#> R version 4.3.2 (2023-10-31 ucrt)
#> Platform: x86_64-w64-mingw32/x64 (64-bit)
#> Running under: Windows 10 x64 (build 21996)
#>
#> Matrix products: default
#>
#>
#> locale:
#> [1] LC_COLLATE=French_France.utf8 LC_CTYPE=French_France.utf8
#> [3] LC_MONETARY=French_France.utf8 LC_NUMERIC=C
#> [5] LC_TIME=French_France.utf8
#>
#> time zone: Atlantic/Reykjavik
#> tzcode source: internal
#>
#> attached base packages:
#> [1] stats graphics grDevices utils datasets methods base
#>
#> other attached packages:
#> [1] styler_1.10.2 reprex_2.1.0 datapasta_3.1.0 lubridate_1.9.3
#> [5] forcats_1.0.0 stringr_1.5.1 dplyr_1.1.4 purrr_1.0.2
#> [9] readr_2.1.5 tidyr_1.3.1 tibble_3.2.1 ggplot2_3.4.4
#> [13] tidyverse_2.0.0 epikit_0.1.6 janitor_2.2.0 skimr_2.1.5
#> [17] here_1.0.1 rio_1.0.1
#>
#> loaded via a namespace (and not attached):
#> [1] utf8_1.2.4 generics_0.1.3 class_7.3-22 KernSmooth_2.23-22
#> [5] stringi_1.8.3 hms_1.1.3 digest_0.6.34 magrittr_2.0.3
#> [9] evaluate_0.23 grid_4.3.2 timechange_0.3.0 fastmap_1.1.1
#> [13] R.oo_1.26.0 R.cache_0.16.0 rprojroot_2.0.4 jsonlite_1.8.8
#> [17] R.utils_2.12.3 e1071_1.7-14 DBI_1.2.1 fansi_1.0.6
#> [21] scales_1.3.0 cli_3.6.2 rlang_1.1.3 units_0.8-5
#> [25] R.methodsS3_1.8.2 munsell_0.5.0 base64enc_0.1-3 withr_3.0.0
#> [29] repr_1.1.6 yaml_2.3.8 tools_4.3.2 tzdb_0.4.0
#> [33] colorspace_2.1-0 pacman_0.5.1 vctrs_0.6.5 R6_2.5.1
#> [37] proxy_0.4-27 classInt_0.4-10 lifecycle_1.0.4 snakecase_0.11.1
#> [41] fs_1.6.3 pkgconfig_2.0.3 pillar_1.9.0 gtable_0.3.4
#> [45] Rcpp_1.0.12 glue_1.7.0 sf_1.0-15 xfun_0.41
#> [49] tidyselect_1.2.0 rstudioapi_0.15.0 knitr_1.45 htmltools_0.5.7
#> [53] rmarkdown_2.25 compiler_4.3.2
Can you help me with that error?