login
A069510
a(1) = 1; a(n) = smallest palindrome of the form k*a(n-1) + 1.
5
1, 2, 3, 4, 5, 6, 7, 8, 9, 55, 111, 1111, 11111, 111111, 1111111, 11111111, 111111111, 1111111111, 11111111111, 111111111111, 1111111111111, 11111111111111, 111111111111111, 1111111111111111, 11111111111111111, 111111111111111111
OFFSET
1,2
FORMULA
a(n) = {10^(n - 8) - 1}/9 for n >10.
From Chai Wah Wu, Jun 20 2016: (Start)
a(n) = 11*a(n-1) - 10*a(n-2) for n > 12.
G.f.: x*(440*x^11 - 404*x^10 + 36*x^9 - 9*x^8 - 9*x^7 - 9*x^6 - 9*x^5 - 9*x^4 - 9*x^3 - 9*x^2 - 9*x + 1)/((x - 1)*(10*x - 1)). (End)
MATHEMATICA
a[1] = 1; a[n_] := a[n] = Block[{k = 1}, While[ FromDigits[ Reverse[ IntegerDigits[ k*a[n - 1] + 1]]] != k*a[n - 1] + 1, k++ ]; k*a[n - 1] + 1]; Table[ a[n], {n, 1, 26}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Mar 30 2002
EXTENSIONS
Edited and extended by Robert G. Wilson v, Apr 19 2003
STATUS
approved