|
%I #22 Sep 08 2022 08:44:47
%S 13,4637,5849,5923,16183,16979,34919,36277,67003,79337,115571,159739,
%T 175141,245753,249133,305717,341569,359353,383833,437263,455317,
%U 498497,511519,567121,579961,581699,633797,683831,693431,849197,972197,1022449
%N Primes that remain prime through 5 iterations of function f(x) = 6x + 5.
%C Primes p such that 6*p+5, 36*p+35, 216*p+215, 1296*p+1295 and 7776*p+7775 are also primes. - _Vincenzo Librandi_, Aug 05 2010
%H John Cerkan, <a href="/A023345/b023345.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[1100000],And@@PrimeQ[NestList[6#+5&,#,5]]&] (* _Harvey P. Dale_, Mar 31 2012 *)
%o (Magma) [n: n in [1..10000000] | IsPrime(n) and IsPrime(6*n+5) and IsPrime(36*n+35) and IsPrime(216*n+215) and IsPrime(1296*n+1295) and IsPrime(7776*n+7775)] // _Vincenzo Librandi_, Aug 05 2010
%Y Subsequence of A023221, A023257, A023288, A023317, and A059325.
%K nonn
%O 1,1
%A _David W. Wilson_
|
