| assert_all_are_honorifics {assertive.data} | R Documentation |
Checks that the input contains honorifics (a.k.a. titles or salutations).
assert_all_are_honorifics(x, na_ignore = FALSE,
severity = getOption("assertive.severity", "stop"))
assert_any_are_honorifics(x, na_ignore = FALSE,
severity = getOption("assertive.severity", "stop"))
is_honorific(x)
x |
Input to check. |
na_ignore |
A logical value. If |
severity |
How severe should the consequences of the assertion be?
Either |
is_honorific returns TRUE if the input string contains
a valid UK postcode. The assert_* function returns nothing but throws an
error when the is_* function returns FALSE.
Single full stops (periods) following a word boundary and preceding a space or the end of the string are stripped. Case is ignored. There is no formal list of official salutations, so this should only be used as a guide, rather than giving a definitive result. Especially note that cultural conventions differ across the world and this function has a UK bias.
Many possibilities borrowed from the Salutation dropdown on the MathWorks account creation page. https://www.mathworks.com/accesslogin/createProfile.do
x <- c("Mr", "MR", "mr.", "Mister", "masTer", "Mr!", "M.r", ".Mr")
is_honorific(x)