# NOT RUN {
# TRUE
is_nonempty_string("hello")
# All FALSE
x <- c("hello", "world")
is_nonempty_string(x)
is_nonempty_string(NA_character_)
is_nonempty_string(character(0))
is_nonempty_string(NULL)
is_nonempty_string(12345)
# }
Run the code above in your browser using DataLab