# NOT RUN {
A <- data.frame(
col1 = c(1, 2, 3),
col2 = c(4, 5, 6),
col3 = c(7, 8, 9)
)
validateIsOfType(A, "data.frame")
validateIsInteger(5)
validateIsNumeric(1.2)
validateIsCharacter("x")
validateIsLogical(TRUE)
# }
Run the code above in your browser using DataLab