x <- phone(c(0, 0123, "0412 345 678", "61412987654", "03 9123 4567", "+12015550123"), "AU")
is_parsed(x)
is_valid(x)
is_possible(x)
is_possible(x, detailed = TRUE)
is_possible(x, type = "MOBILE")
is_possible(x, detailed = TRUE, type = "MOBILE")
Run the code above in your browser using DataLab