OFFSET
1,1
MATHEMATICA
With[{np=Select[Range[100000], !PrimeQ[#]&]}, NestList[np[[#]]&, 7, 50]] (* Harvey P. Dale, Apr 06 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved