A055983 a(n+1) = a(n) converted to base 10 from base 12.
10, 12, 14, 16, 18, 20, 24, 28, 32, 38, 44, 52, 62, 74, 88, 104, 148, 200, 288, 392, 542, 770, 1092, 1838, 2924, 4780, 8016, 13842, 27122, 53738, 109916, 265698, 631700, 1557936, 4347258, 12785828, 43721312, 154070654, 621230752, 2655100718
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..100
Programs
-
Haskell
a055983 n = a055983_list !! (n-1) a055983_list = iterate (a102487 . (+ 1)) 10 -- Reinhard Zumkeller, Aug 29 2013
-
Mathematica
NestList[FromDigits[IntegerDigits[#],12]&,10,40] (* Vincenzo Librandi, Apr 06 2012 *)
Formula
a(n+1) = A102487(a(n)+1), a(1) = 8. - Reinhard Zumkeller, Aug 29 2013