OFFSET
1,1
COMMENTS
Primes of the form 10n+3 such that 10n+1, 10n+7, and 10n+9 are composite. - Charles R Greathouse IV, Sep 06 2012
LINKS
V. Raman, Table of n, a(n) for n = 1..10000
FORMULA
a(n) ~ 4n log n. - Charles R Greathouse IV, Sep 06 2012
MATHEMATICA
t = {}; Do[ps = Select[Range[10*n, 10*n + 9], PrimeQ]; If[ps == {10*n + 3}, AppendTo[t, ps[[1]]]], {n, 0, 595}]; t (* T. D. Noe, Sep 04 2012 *)
Select[10*Range[500]+3, PrimeQ[#]&&AllTrue[#+{-2, 4, 6}, CompositeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Mar 27 2016 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
V. Raman, Sep 03 2012
STATUS
approved