# A character column
frame1 <- data.frame(A = c("Man", "Women", "Man", "Undet."))
dichotomize(frame1, "A", sep = "; ")
# A character column (with separator)
frame2 <- data.frame(A = c("Man; Women", "Women; Women",
"Man; Man", "Undet.; Women; Man"))
dichotomize(frame2, "A", sep = "; ")
# A character column and another factor column (same sepatator)
frame3 <- data.frame(A = c("Man; Women", "Women; Women",
"Man; Man", "Undet.; Women; Man"),
C = factor(c(1:4), labels = c("Paris", "New York",
"London; New York", "")))
dichotomize(frame3, c("A", "C"), sep = "; ")
# A set of simple character or factor (same levels) variables.
# In this case, you must use "C" separator.
frame4 <- data.frame(A = c("Man", "Women","Man", "Undet",NA),
B = c("Women","Women","Man","Women",NA),
C = c(NA,NA,NA,"Man",NA))
dichotomize(frame4,c("A","B","C"), sep="C")
Run the code above in your browser using DataLab