OFFSET
0,4
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..100
Wikipedia, Polygonal number
EXAMPLE
a(5) = pg(3, 5) * pg(4, 5) * pg(5, 5) = 15 * 25 * 35 = 13125.
MAPLE
p:= (s, n)-> (n^2*(s-2)-n*(s-4))/2:
a:= n-> mul(p(i, n), i=3..n):
seq(a(n), n=0..15); # Alois P. Heinz, Apr 23 2014
PROG
(PARI) pg(m, n) = (n^2*(m-2)-n*(m-4))/2;
v=[]; for(n=0, 20, v=concat(v, prod(m=3, n, pg(m, n)))); v
CROSSREFS
KEYWORD
nonn
AUTHOR
Colin Barker, Apr 22 2014
STATUS
approved