# NOT RUN {
seven <- import_rounds(7, your_email)
attr(seven$tvtot, "labels")
mean(seven$tvtot, na.rm = TRUE)
names(table(seven$lnghom1))
# First three are actually missing values
seven_recoded <- recode_missings(seven)
attr(seven_recoded$tvtot, "labels")
# All missings have been removed
mean(seven_recoded$tvtot, na.rm = TRUE)
names(table(seven_recoded$lnghom1))
# All missings have been removed
# If you want to operate on specific variables
# you can use other recode_*_missing
seven$tvtot <- recode_numeric_missing(seven$tvtot)
# Recode only 'Don't know' and 'No answer' to missing
seven$tvpol <- recode_numeric_missing(seven$tvpol, c("Don't know", "No answer"))
# The same can be done with recode_strings_missing
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab