OFFSET
1,1
LINKS
Odimar Fabeny, Table of n, a(n) for n = 1..10000
MATHEMATICA
FactorInteger[#][[1, 1]]&/@Select[Range[17, 4000, 18], CompositeQ] (* Harvey P. Dale, Jun 19 2022 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Odimar Fabeny, Sep 25 2014
STATUS
approved