OFFSET
1,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = (A007521(n)-5)/8. - Zak Seidov, Sep 08 2015
MAPLE
M:=500; f:=proc(n) local t1, t2; t1:=[]; for k from 0 to M do t2:=2^n*k+2^(n-1)+1; if isprime(t2) then t1:=[op(t1), k]; fi; od; t1; end; f(3);
MATHEMATICA
Select[Range[0, 300], PrimeQ[8 # + 5]&] (* Vincenzo Librandi, Jan 07 2013 *)
PROG
(Magma) [n: n in [0..500] | IsPrime(8*n+5)]; // Vincenzo Librandi, Jan 07 2013
(PARI) is(n)=isprime(8*n+5) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, based on correspondence from Marco Matosic, Apr 11 2005
STATUS
approved