OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..100
FORMULA
a(n+1) = A102487(a(n)+1), a(1) = 8. - Reinhard Zumkeller, Aug 29 2013
MATHEMATICA
NestList[FromDigits[IntegerDigits[#], 12]&, 10, 40] (* Vincenzo Librandi, Apr 06 2012 *)
PROG
(Haskell)
a055983 n = a055983_list !! (n-1)
a055983_list = iterate (a102487 . (+ 1)) 10 -- Reinhard Zumkeller, Aug 29 2013
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Henry Bottomley, Jun 01 2000
STATUS
approved