OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[200], PrimeQ[8# - 3]&] (* Vincenzo Librandi, Jan 07 2013 *)
PROG
(Magma) [n: n in [1..200] | IsPrime(8*n-3)]; // Vincenzo Librandi, Jan 07 2013
(PARI) is(n)=isprime(8*n-3) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved