A081938 - OEIS

%I #10 Oct 05 2018 14:51:58

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

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

%t 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 *)

%Y Cf. A081939.

%K base,more,nonn

%O 1,2

%A _Amarnath Murthy_, Apr 02 2003

%E a(8) and a(9) from _R. J. Mathar_, Jul 15 2007

%E a(10) from _Donovan Johnson_, Mar 26 2011