login
Largest prime < 10*a(n-1), a(1)=7.
1

%I #7 Jun 28 2014 08:24:00

%S 7,67,661,6607,66067,660661,6606581,66065773,660657713,6606577129,

%T 66065771269,660657712667,6606577126663,66065771266577,

%U 660657712665739,6606577126657373,66065771266573693,660657712665736927

%N Largest prime < 10*a(n-1), a(1)=7.

%H Vincenzo Librandi, <a href="/A124291/b124291.txt">Table of n, a(n) for n = 1..200</a>

%t NestList[NextPrime[10 #, - 1]&, 7, 30] (* _Vincenzo Librandi_, Jun 28 2014 *)

%Y Cf. A006902, A040016, A120031-A120041.

%K nonn

%O 1,1

%A _Artur Jasinski_, Dec 16 2006