# no names or labels returns integer vector of values 1:length(prob)
prob <- c(.1, .2, .4, .2, .1)
rlikert(10, prob)
# named prob returns factor
prob <- c(A = 10, B = 20, C = 30)
rlikert(10, prob)
# specify labels if prob not named and not 1:length(prob)
labels <- -2:2
prob <- rep(1, length(labels)) # uniform probability
rlikert(10, prob, labels)
Run the code above in your browser using DataLab