OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
C. K. Caldwell, The Prime Pages.
FORMULA
From Ray Chandler, Apr 07 2009: (Start)
a(n) = A158614(n)*30 + 11.
MATHEMATICA
Select[Prime[Range[1000]], MemberQ[{11}, Mod[#, 30]]&] (* Vincenzo Librandi, Aug 14 2012 *)
Select[Range[11, 2600, 30], PrimeQ] (* Harvey P. Dale, Mar 07 2020 *)
PROG
(Magma) [p: p in PrimesUpTo(3000) | p mod 30 eq 11 ]; // Vincenzo Librandi, Aug 14 2012
(PARI) is(n)=isprime(n) && n%30==11 \\ Charles R Greathouse IV, Jul 01 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Omar E. Pol, Aug 15 2007
EXTENSIONS
Extended by Ray Chandler, Apr 07 2009
STATUS
approved