|
%I #13 Nov 15 2021 02:46:40
%S 7,79,3169,31699,1584959,110947139,8875771129,88757711299,
%T 30177621841669,10260391426167469,718227399831722839,
%U 222650493947834080099,122457771671308744054459,9796621733704699524356729,6563736561582148681319008439,3019318818327788393406743881949
%N Beginning with 7, primes of the form: least multiple of the previous term followed by a 9. Beginning with 7, a(n) is the least prime of the form k*a(n-1)*10 +9.
%H Harvey P. Dale, <a href="/A113034/b113034.txt">Table of n, a(n) for n = 1..100</a>
%t lm9[n_]:=Module[{k=1},While[!PrimeQ[10*k*n+9],k++];10*k*n+9]; NestList[ lm9,7,15] (* _Harvey P. Dale_, Jan 16 2015 *)
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Jan 03 2006
%E More terms from _Joshua Zucker_, Jan 11 2006
%E Corrected by _T. D. Noe_ and _Don Reble_, Nov 15 2006
%E More terms from _Harvey P. Dale_, Jan 16 2015
|
