OFFSET
1,1
COMMENTS
Up to 4913, there are more primes of this form than composites. See also A132231 and A227869 (congruent to 7 only). - M. F. Hasler, Nov 02 2013
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
C. K. Caldwell, The Prime Pages.
MATHEMATICA
Select[Prime[Range[1000]], MemberQ[{7, 23}, Mod[#, 30]]&] (* Vincenzo Librandi, Aug 14 2012 *)
PROG
(Magma) [ p: p in PrimesUpTo(1300) | p mod 30 in [7, 23] ]; // Vincenzo Librandi, Aug 14 2012
(PARI) is_A132237(n)=setsearch([7, 23], n%30)&&isprime(n) \\ - M. F. Hasler, Nov 02 2013
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Aug 15 2007
STATUS
approved