Description Usage Arguments Value Author(s) Examples
Gives "poor" to "outstanding" or "excellent" response option labels to variables.
1 | neverAlways(dat, vars, ros, ord=TRUE)
|
dat |
the data frame |
vars |
a single variable or a list of multiple variables |
ros |
which label set to use; 0 will return "never", "seldom", "sometimes", "often", "usually", and "always"; anything else will return "never/almost never", "seldom/rarely", "sometimes", "often", "usually/most of the time", and "almost always/always" |
ord |
logical indicating whether the items should be ordinal (TRUE:default) or factor (FALSE) |
This function will return response option labels for ordered factors.
Seth Berry, Michael Clark
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | ##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function(dat, vars, ros, ord=TRUE){
require(dplyr)
datReduced = select(dat, one_of(vars))
if(ros == 0)
likOrd = lapply(datReduced, function(x)
factor(x,
levels = c(1,2,3,4),
labels = c("Poor", "Good",
"Very good", "Outstanding"),
ordered=ord)
)
else {
datReduced = select(dat, one_of(vars))
likOrd = lapply(datReduced, function(x)
factor(x,
levels = c(1,2,3,4),
labels = c("Poor", "Fair",
"Good", "Excellent"),
ordered=ord)
)
}
likOrd = as.data.frame(likOrd)
dat[,vars] = likOrd
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.