OFFSET
1,1
COMMENTS
There are exactly 454 oban numbers. - Eric W. Weisstein, Nov 09 2003
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..454
Roel and Bas van Dijk, Numerals package, Hackage (Haskell packages).
Eric Weisstein's World of Mathematics, Oban Number
PROG
(Haskell)
import Data.Maybe (fromJust)
import Data.Text (Text); import qualified Data.Text as T (all)
import Text.Numeral.Grammar.Reified (defaultInflection)
import qualified Text.Numeral.Language.EN as EN -- see link
a008521 n = a008521_list !! (n-1)
a008521_list = filter (T.all (/= 'o') . numeral) [0..] where
numeral :: Integer -> Text
numeral = fromJust . EN.gb_cardinal defaultInflection
-- Reinhard Zumkeller, Jan 23 2015
(Python)
from num2words import num2words
afull = [k for k in range(1000) if "o" not in num2words(k)]
print(afull[:70]) # Michael S. Branicky, Aug 18 2022
CROSSREFS
KEYWORD
nonn,word,fini,full
AUTHOR
STATUS
approved
