login
A181680
Primes p such that (p-1)/2, (p-2)/3, (p-3)/4, (p-4)/5 and (p-5)/6 are prime numbers.
1
7224839, 9339119, 10780559, 42464519, 45652319, 53464319, 62198639, 69899759, 94159799, 121136399, 130777919, 158608799, 191010959, 285785639, 288308159, 322461719, 353256119, 402411239, 423803519
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[20000000]], PrimeQ[(#-1)/2]&&PrimeQ[(#-2)/3]&&PrimeQ[(#-3)/4]&&PrimeQ[(#-4)/5]&&PrimeQ[(#-5)/6]&]
Select[Prime[Range[2254*10^4]], AllTrue[(#-Range[5])/Range[2, 6], PrimeQ]&] (* Harvey P. Dale, May 29 2024 *)
CROSSREFS
Cf. A093554.
Sequence in context: A288481 A286010 A184214 * A253469 A325606 A157378
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited, terms checked and two terms added by Klaus Brockhaus, Nov 17 2010
STATUS
approved