%I #24 Sep 08 2022 08:44:47
%S 109891,324763,852367,3371527,3557797,4448701,4471549,5304661,5616679,
%T 5688919,5727349,7766659,8028109,8554999,9034723,10867099,11146987,
%U 12396487,12926401,14186611,18274513,19251517,20882713,21810493,23953921
%N Primes that remain prime through 5 iterations of function f(x) = 8x + 5.
%C Primes p such that 8*p+5, 64*p+45, 512*p+365, 4096*p+2925 and 32768*p+23405 are also primes. - _Vincenzo Librandi_, Aug 05 2010
%H John Cerkan, <a href="/A023349/b023349.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) == 19 (mod 42). - _John Cerkan_, Nov 06 2016
%t p5Q[n_]:=And@@PrimeQ/@NestList[8#+5&,n,5]; Parallelize[Select[Prime[Range[1510000]],p5Q]] (* _Harvey P. Dale_, Feb 22 2011 *)
%o (Magma) [n: n in [1..19000000] | IsPrime(n) and IsPrime(8*n+5) and IsPrime(64*n+45) and IsPrime(512*n+365) and IsPrime(4096*n+2925) and IsPrime(32768*n+23405)] // _Vincenzo Librandi_, Aug 05 2010
%Y Subsequence of A023230, A023262, A023293, A023321, and A105133.
%K nonn
%O 1,1
%A _David W. Wilson_
|