Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
x1 <- c('yEs', 'no', 'UNKNOWN', NA)
x2 <- c('y', 'n', 'no', 'present')
label(x2) <- 'X2'
X <- ynbind(x1, x2, label='x1-2')
X[1:3,]
pBlock(x1, x2, subset=2:3, label='x1-2')
# }
Run the code above in your browser using DataLab