OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[0, 100], PrimeQ[11# + 4]&] (* Vincenzo Librandi, Sep 24 2012 *)
PROG
(Magma) [n: n in [0..410] | IsPrime(11*n+4)]; // Vincenzo Librandi, Sep 24 2012
(PARI) is(n)=isprime(11*n+4) \\ Charles R Greathouse IV, Sep 24 2012
(Sage) [n for n in (1..600) if is_prime(11*n+4)] # G. C. Greubel, Sep 18 2019
(GAP) Filtered([1..600], k-> IsPrime(11*k+4)); # G. C. Greubel, Sep 18 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 15 2009
STATUS
approved