string <- paste0("abc", 1:12)
print(string)
str_alphord_nums(string)
str_alphord_nums(c("abc9def55", "abc10def7"))
str_alphord_nums(c("01abc9def55", "5abc10def777", "99abc4def4"))
str_alphord_nums(1:10)
if (FALSE) {
str_alphord_nums(c("abc9def55", "abc10xyz7")) # error
}
Run the code above in your browser using DataLab