# NOT RUN {
uncardinal("one")
uncardinal("negative one hundred fifty-seven")
uncardinal(
c(
"twenty-five",
"one million two hundred thirty-four thousand five hundred sixty-seven"
)
)
uncardinal("infinity")
card <- cardinal(25)
uncardinal(card)
ord <- ordinal(25)
uncardinal(ord)
# }
Run the code above in your browser using DataLab