OFFSET
1,16
COMMENTS
Ordinal transform of A053836. - Alois P. Heinz, Dec 23 2018
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Hexadecimal
Eric Weisstein's World of Mathematics, Digit Sum
Wikipedia, Hexadecimal
Wikipedia, Digit sum
PROG
(Haskell)
import Data.IntMap (empty, findWithDefault, insert)
a263110 n = a263110_list !! (n-1)
a263110_list = f 1 empty where
f x m = y : f (x + 1) (insert q (y + 1) m) where
y = findWithDefault 1 q m; q = a053836 x
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Oct 09 2015
STATUS
approved