OFFSET
1,2
FORMULA
a(n) = Sum_{k=2..2*n} ((-1)^k)*A090438(n, k), n>=1, a(0):= 1.
a(n) = (2*n+2)!*hypergeom([-2*n],[3],1)/2, assuming offset 0. - Peter Luschny, Apr 08 2015
MAPLE
# assuming offset 0:
p := (n, x) -> (2*n+2)!*hypergeom([-2*n], [3], x)/2;
seq(simplify(p(n, 1)), n=0..11); # Peter Luschny, Apr 08 2015
MATHEMATICA
a[n_, k_] := (-1)^k/k! Sum[(-1)^p Binomial[k, p] Product[FactorialPower[p + 2(j-1), 2], {j, 1, n}], {p, 2, k}];
a[n_] := Sum[(-1)^k a[n, k], {k, 2, 2n}];
Array[a, 14] (* Jean-François Alcover, Jun 05 2019 *)
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Wolfdieter Lang, Dec 23 2003
STATUS
approved