A081938 a(1) = 1, a(n) = smallest palindromic number > a(n-1) of the form k*a(n-1) - 1.

1, 2, 3, 5, 9, 44, 131, 602206, 39293339293, 98576836066063867589

Offset

1,2

Links

Table of n, a(n) for n=1..10.

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

Adjacent sequences: A081935 A081936 A081937 * A081939 A081940 A081941

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