OFFSET
1,2
EXAMPLE
For n = 5, a(5) = (4*6*8*9*10) mod (4+6+8+9+10) = 17280 mod 37 = 1.
MATHEMATICA
comp=Select[Range[2, 83], !PrimeQ[#]&]; Mod[Rest[FoldList[Times, 1, comp]], Accumulate[comp]] (* Ivan N. Ianakiev, May 22 2015 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Walter Carlini, May 14 2015
EXTENSIONS
More terms from Alois P. Heinz, May 21 2015
STATUS
approved