login
A081938
a(1) = 1, a(n) = smallest palindromic number > a(n-1) of the form k*a(n-1) - 1.
1
1, 2, 3, 5, 9, 44, 131, 602206, 39293339293, 98576836066063867589
OFFSET
1,2
MATHEMATICA
nxt[n_]:=Module[{k=2}, While[!PalindromeQ[k*n-1], k++]; k*n-1]; Join[{1}, NestList[ nxt, 2, 8]] (* Harvey P. Dale, Oct 05 2018 *)
CROSSREFS
Cf. A081939.
Sequence in context: A276410 A003432 A179332 * A129500 A250745 A109204
KEYWORD
base,more,nonn
AUTHOR
Amarnath Murthy, Apr 02 2003
EXTENSIONS
a(8) and a(9) from R. J. Mathar, Jul 15 2007
a(10) from Donovan Johnson, Mar 26 2011
STATUS
approved