select_tbl(data = tas,
var_stem = "involved_",
na_removal = "pairwise")
select_tbl(data = depressive,
var_stem = "dep",
na_removal = "listwise",
pivot = "wider",
only = "percent")
var_label_example <-
c("dep_1" = "how often child feels sad and blue",
"dep_2" = "how often child feels nervous, tense, or on edge",
"dep_3" = "how often child feels happy",
"dep_4" = "how often child feels bored",
"dep_5" = "how often child feels lonely",
"dep_6" = "how often child feels tired or worn out",
"dep_7" = "how often child feels excited about something",
"dep_8" = "how often child feels too busy to get everything")
select_tbl(data = depressive,
var_stem = "dep",
na_removal = "pairwise",
pivot = "longer",
var_labels = var_label_example)
select_tbl(data = depressive,
var_stem = "dep",
na_removal = "pairwise",
pivot = "wider",
only = "count",
var_labels = var_label_example)
Run the code above in your browser using DataLab