OFFSET
1,2
COMMENTS
Also: Numbers k such that 2k+1 is in A002145, i.e., a Gaussian prime. - M. F. Hasler, Feb 25 2011
Also: Number of quadratic residues modulo A002145(n). - M. F. Hasler, Feb 25 2011
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = floor(A002145(n)/2). - M. F. Hasler, Feb 25 2011
MATHEMATICA
Select[Range[1, 301, 2], PrimeQ[2#+1]&] (* Harvey P. Dale, May 08 2012 *)
PROG
(PARI) forstep( k=1, 250, 2, isprime(2*k+1) && print1(k", ")) \\ M. F. Hasler, Feb 25 2011
(PARI) forprime( p=1, 500, p%4==3 || next; print1(p\2", ")) \\ M. F. Hasler, Feb 25 2011
(Magma) [n: n in [1..500 by 2] | IsPrime(2*n+1)]; // Vincenzo Librandi, Aug 14 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Mar 18 2005
STATUS
approved