A010066 a(n+1) = a(n) + sum of digits in base 5 representation of a(n).
1, 2, 4, 8, 12, 16, 20, 24, 32, 36, 40, 44, 52, 56, 60, 64, 72, 80, 84, 92, 100, 104, 112, 120, 128, 132, 136, 140, 144, 152, 156, 160, 164, 172, 180, 184, 192, 200, 204, 212, 220, 228, 236, 244, 256, 260, 264, 272, 280, 284, 292, 300, 304, 312
Offset: 0
References
- S. R. Finch, Mathematical Constants, Cambridge, 2003, Section 2.24.
Links
Programs
-
Mathematica
NestList[# + Total[IntegerDigits[#, 5]] &, 1, 60] (* Harvey P. Dale, Oct 12 2016 *)
-
PARI
a = 1; print1(a, ", "); for(i = 1, 40, a = a + sumdigits(a,5); print1(a, ", ")); \\ Nile Nepenthe Wynar, Feb 10 2018
Extensions
More terms from Neven Juric, Apr 11 2008