|
%I #12 Sep 08 2022 08:45:17
%S 2,5,11,13,19,23,37,41,43,53,61,71,79,83,89,103,107,127,151,167,173,
%T 179,181,191,193,197,223,229,233,239,251,281,307,313,317,349,379,421,
%U 431,433,439,443,467,487,523,569,571,587,593,607,613,617,641,653,659
%N Primes p such that 20*p + 3 is prime.
%H Michael De Vlieger, <a href="/A105961/b105961.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Prime[Range[120]], PrimeQ[20#+3]&]
%o (Magma) [p: p in PrimesUpTo(5000)|IsPrime(20*p+3)] // _Vincenzo Librandi_, Jan 30 2011
%Y Cf. A023238.
%K nonn
%O 1,1
%A _Zak Seidov_, May 05 2005
|
