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

Author

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

Keywords

• nonn
• easy

Comments

Used in a primality test.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000
• Chris Caldwell, Prime Test.

Programs

Magma

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

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 *)

Extensions

More terms from Emeric Deutsch, Feb 26 2005