# NOT RUN {
tbl < -as.data.frame(matrix(1:9, nrow = 3))
check_args(arg = tbl, type = c("data.frame"))
vec <- c("a", "b", "c")
check_args(arg = vec, type = c("character"), length = 3)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab