# NOT RUN {
arg1 <- 2
checkNumVec(list(arg1))
# }
# NOT RUN {
checkNumVec(list(TRUE, T, 2))
checkNumVec(list(TRUE, T, 2), c('Var1', 'Var2', 'Var3'))
arg2 <- 0.8
checkNumVec(list(arg2))
checkNumVec(list(arg2, 'T', 2))
# }
Run the code above in your browser using DataLab