## multiple choice answer
mc <- c(TRUE, FALSE, TRUE, FALSE, FALSE)
## switching to string representation
mchoice2string(mc)
## reverse string encoding
string2mchoice("10100")
## switching to text
mchoice2text(mc)Run the code above in your browser using DataLab