A094330 Product of next n numbers divided by n.

1, 3, 40, 1260, 72072, 6511680, 852508800, 152512113600, 35730097603200, 10613749905158400, 3897631650008678400, 1733625189541076832000, 918381625086037787136000, 571320549624154764994560000

Offset

1,2

Links

Table of n, a(n) for n=1..14.

Example

a(4) = (7*8*9*10)/4.

Mathematica

f[n_] := Module[{start = Plus @@ Range[n - 1] + 1, end}, end = start + n - 1; (Times @@ Range[start, end])/n]; Table[f[i], {i, 15}]
With[{nn=15}, Times@@#/Length[#]&/@TakeList[Range[(nn(nn+1))/2], Range[ nn]]] (* Requires Mathematica version 11 or later *) (* Harvey P. Dale, May 22 2018 *)

Crossrefs

Sequence in context: A047799 A204515 A012250 * A110468 A327356 A295612

Adjacent sequences: A094327 A094328 A094329 * A094331 A094332 A094333

Keyword

nonn

Author

Amarnath Murthy, May 13 2004

Extensions

More terms from Harvey P. Dale, May 23 2004

Status

approved