diff --git a/README.Rmd b/README.Rmd index 4597aed..8ce9207 100644 --- a/README.Rmd +++ b/README.Rmd @@ -13,7 +13,7 @@ knitr::opts_chunk$set( ) ``` -# cleanR +# cleanR @@ -52,8 +52,8 @@ head(my_logbook) Now you can inspect the data and use the log_issue() to write the observations of the data that you find with the issues in the logbook. ```{r} -check_age <- data %>% - filter(ki_age < 15) %>% +check_age <- survey_data %>% + filter(RESPAge < 15) %>% log_sheet(question.name = "ki_age", issue = "respondent is under 15 years old", action = "delete") diff --git a/README.md b/README.md index 85baa7b..b6b3548 100644 --- a/README.md +++ b/README.md @@ -1,7 +1,7 @@ -# cleanR +# cleanR @@ -52,23 +52,16 @@ Now you can inspect the data and use the log_issue() to write the observations of the data that you find with the issues in the logbook. ``` r -check_age <- data %>% - filter(ki_age < 15) %>% +check_age <- survey_data %>% + filter(RESPAge < 15) %>% log_sheet(question.name = "ki_age", issue = "respondent is under 15 years old", action = "delete") # inspect the check_age data head(check_age) -#> uuid question.name -#> 1 4182fa56-e689-484345-888c8e-e12a90657bf8 ki_age -#> 2 cf35eab9-3fa1-464442-b4bdb2-27139e8450da ki_age -#> 3 b67f2895-ca54-40454e-969a91-fcb573d409e8 ki_age -#> 4 d091c452-b147-444d48-9a9e9d-be20f47863d1 ki_age -#> issue feedback action old.value new.value -#> 1 respondent is under 15 years old delete 10 -#> 2 respondent is under 15 years old delete 10 -#> 3 respondent is under 15 years old delete 13 -#> 4 respondent is under 15 years old delete 14 +#> [1] uuid question.name issue feedback action +#> [6] old.value new.value +#> <0 rows> (or 0-length row.names) ``` now you can merge the check_age data with the logbook so you can @@ -78,16 +71,9 @@ maintain one logbook that can be exported at the end. my_logbook <- rbind(my_logbook, check_age) head(my_logbook) -#> uuid question.name -#> 1 4182fa56-e689-484345-888c8e-e12a90657bf8 ki_age -#> 2 cf35eab9-3fa1-464442-b4bdb2-27139e8450da ki_age -#> 3 b67f2895-ca54-40454e-969a91-fcb573d409e8 ki_age -#> 4 d091c452-b147-444d48-9a9e9d-be20f47863d1 ki_age -#> issue feedback action old.value new.value -#> 1 respondent is under 15 years old delete 10 -#> 2 respondent is under 15 years old delete 10 -#> 3 respondent is under 15 years old delete 13 -#> 4 respondent is under 15 years old delete 14 +#> [1] uuid question.name issue feedback action +#> [6] old.value new.value +#> <0 rows> (or 0-length row.names) ``` ## Feedback & Contributions diff --git a/man/figures/logo.png b/man/figures/logo.png new file mode 100644 index 0000000..df79aec Binary files /dev/null and b/man/figures/logo.png differ