login
A238103
Product of composite numbers in range n+1 to 2n, exclusive of endpoints.
1
1, 1, 1, 6, 72, 720, 1080, 25200, 40320, 725760, 25401600, 558835200, 23950080000, 1120863744000, 1961511552000, 58845346560000, 3452260331520000, 4108189794508800000, 7394741630115840000, 521857480753889280000, 948831783188889600000, 39850934893933363200000, 3287702128749502464000000
OFFSET
1,4
LINKS
EXAMPLE
For n=6, the range (7,12) contains three composite numbers 8,9,10 whose product is a(6) = 720.
MATHEMATICA
Table[Times@@Select[Range[n+2, 2n-1], CompositeQ], {n, 30}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 14 2018 *)
CROSSREFS
Cf. A157625 (inclusive version).
Sequence in context: A133678 A005548 A059410 * A200978 A361572 A099673
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 26 2014
STATUS
approved