OFFSET
1,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..100000
Wikipedia, Luhn algorithm
PROG
(Haskell)
import Data.List (sortBy); import Data.Function (on)
a249854 n = a249854_list !! (n-1)
a249854_list = sortBy (compare `on` show) $
takeWhile (<= 10^6) a093018_list
CROSSREFS
KEYWORD
nonn,base,fini,full
AUTHOR
Reinhard Zumkeller, Nov 08 2014
STATUS
approved