# NOT RUN {
library(data.table)
inputDT <- as.data.table(data.frame(x = rep(c(TRUE, FALSE), 5), y = LETTERS[1:10]))
asFactorDT(inputDT, c('y'))
isCharacterDT(inputDT)
inputDT2 <- as.data.table(data.frame(y = LETTERS[1:10]))
isCharacterDT(inputDT2)
# }
# NOT RUN {
isCharacterDT(inputDT2, c('x', 'y'))
# }
# NOT RUN {
isCharacterDT(inputDT2, returnNames = TRUE)
# }
Run the code above in your browser using DataLab