articlebeforenumber: Indefinite Article Preceding A Number

Description

Determines the indefinite article (an or a) which should precede a given number, if the number is read out in English.

Usage

articlebeforenumber(k)

Arguments

A single integer.

Value

One of the character strings "an" or "a".

Details

This function applies the rule that, if the English word for the number k begins with a vowel, then it should be preceded by an, and otherwise by a.

Examples

Run this code

# NOT RUN {
  f <- function(k) cat(paste(articlebeforenumber(k),
                       paste0(k, "-fold"),
                       "increase\n"))
  f(8)
  f(18)
  f(28)
# }