|
%I #11 Sep 08 2022 08:45:33
%S 7,41,109,211,313,347,449,619,653,823,857,1061,1129,1163,1231,1367,
%T 1571,1741,1877,1979,2081,2251,2557,2591,2659,2693,2897,2999,3067,
%U 3169,3203,3271,3373,3407,3917,4019,4597,4733,4801,4903,4937,5039,5107,5209,5413
%N Primes of form 17*n+7.
%H Vincenzo Librandi, <a href="/A138629/b138629.txt">Table of n, a(n) for n = 1..1000</a>
%e 17*0+7=7, 17*2+7=41, 17*6+7=109, 17*18+7=211, ...
%t a={};Do[x=17*n+7;If[PrimeQ[x],AppendTo[a,x]],{n,10^2}];a
%t Select[17Range[0, 500] + 7, PrimeQ] (* _Vincenzo Librandi_, Sep 01 2016 *)
%o (Magma) [a: n in [0..450] | IsPrime(a) where a is 17*n+7 ]; // _Vincenzo Librandi_, Sep 01 2016
%Y Cf. A144562.
%K nonn,easy
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, May 14 2008
%E More terms from _N. J. A. Sloane_, Jul 11 2008
|
