CO2$`Plant&Type&Treatment` <- paste2(CO2[, 1:3])
CO2 <- CO2[, -c(1:3)]
head(CO2)
head(colsplit2df(CO2, 3))
head(colsplit2df(CO2, 3, qcv(A, B, C)))
head(colsplit2df(CO2, 3, qcv(A, B, C), keep.orig=TRUE))
head(colsplit2df(CO2, "Plant&Type&Treatment"))
CO2 <- datasets::CO2
(x <- question_type(DATA$state, list(DATA$sex, DATA$adult)))
ltruncdf(x)
z <- lcolsplit2df(x)
ltruncdf(z)
Run the code above in your browser using DataLab