A093359 Primes of the form 28n + 1.

29, 113, 197, 281, 337, 421, 449, 617, 673, 701, 757, 953, 1009, 1093, 1289, 1373, 1429, 1597, 1709, 1877, 1933, 2017, 2129, 2213, 2269, 2297, 2381, 2437, 2521, 2549, 2633, 2689, 2801, 2857, 2969, 3109, 3137, 3221, 3361, 3389, 3529, 3557, 3613, 3697

Offset

1,1

Comments

Used in a primality test.

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Chris Caldwell, Prime Test.

Maple

p:=proc(n) if isprime(28*n+1)=true then 28*n+1 else fi end: seq(p(n), n=1..160); # Emeric Deutsch, Feb 26 2005

Mathematica

Select[Table[28*n+1, {n, 0, 700}], PrimeQ] (* Vincenzo Librandi, Jul 17 2012 *)

Prog

(Magma) [a: n in [0..200] | IsPrime(a) where a is 28*n+1]; // Vincenzo Librandi, Jul 17 2012

Crossrefs

Sequence in context: A233118 A338023 A139946 * A158556 A272629 A201602

Adjacent sequences: A093356 A093357 A093358 * A093360 A093361 A093362

Keyword

nonn,easy

Author

Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Apr 27 2004

Extensions

More terms from Emeric Deutsch, Feb 26 2005

Status

approved