A218000 Smallest palindrome which has additive persistence n.
0, 11, 55, 595, 59999999999999999999995
Offset: 0
Examples
0 has additive persistence 0. 11 -> 2 has additive persistence 1. 55 -> 10 -> 1 has additive persistence 2.
Links
- Eric Weisstein's World of Mathematics, Additive Persistence
- Index entries for sequences related to palindromes
Programs
-
Mathematica
lst = {0, 11, 55}; Do[AppendTo[lst, 6*10^(((lst[[-1]] + 5)/3 - 2)/9) - 5], {2}]; lst
Comments