|
%I #11 Sep 08 2022 08:45:35
%S 11,67,151,179,263,347,431,487,571,599,683,739,823,907,991,1019,1103,
%T 1187,1327,1439,1523,1579,1607,1663,1747,1831,1999,2027,2083,2111,
%U 2251,2447,2503,2531,2671,2699,3119,3203,3259,3343,3371,3511,3539,3623,3847,3931
%N Primes congruent to 11 mod 28.
%H Vincenzo Librandi, <a href="/A141969/b141969.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) ~ 12n log n. - _Charles R Greathouse IV_, Jul 03 2016
%t Select[Prime[Range[1500]],MemberQ[{11},Mod[#,28]]&] (* _Vincenzo Librandi_, Aug 17 2012 *)
%t Select[Range[11,4000,28],PrimeQ] (* _Harvey P. Dale_, Oct 23 2017 *)
%o (Magma) [p: p in PrimesUpTo(5000) | p mod 28 eq 11 ]; // _Vincenzo Librandi_, Aug 17 2012
%o (PARI) is(n)=isprime(n) && n%28==11 \\ _Charles R Greathouse IV_, Jul 03 2016
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
