assertive (version 0.1-7)

assert_all_are_uk_telephone_numbers: Is the string a valid UK telephone number?

Description

Checks that the input contains UK telephone numbers.

Usage

assert_all_are_uk_telephone_numbers(x)

  assert_any_are_uk_telephone_numbers(x)

  is_uk_telephone_number(x)

Arguments

x

Input to check.

Value

• is_uk_telephone_number returns TRUE if the input string contains a valid UK telephone number. The {assert_*} function returns nothing but throws an error when the is_* function returns FALSE.

References

The regex is adapted from the one at http://www.aa-asterisk.org.uk/index.php/Regular_Expressions_for_Validating_and_Formatting_UK_Telephone_Numbers with some additional consultation from https://en.wikipedia.org/wiki/List_of_United_Kingdom_dialling_codes

Examples

phone_nos <- c("[phone]", "08457 90 90 90")
is_uk_telephone_number(phone_nos)
assert_all_are_uk_telephone_numbers(phone_nos)