login
A194590
a(n) = (-1)^n*(A056040(n+1)*A152271(n)-2^n)/2.
2
0, 0, 1, -2, 7, -14, 38, -76, 187, -374, 874, -1748, 3958, -7916, 17548, -35096, 76627, -153254, 330818, -661636, 1415650, -2831300, 6015316, -12030632, 25413342, -50826684, 106853668, -213707336, 447472972, -894945944, 1867450648, -3734901296, 7770342787
OFFSET
0,4
COMMENTS
The binomial transform of a(n) are the complementary Riordan numbers A194589 (see link).
FORMULA
a(n) = Sum_{k=0..n} (-1)^(n-k)*binomial(n,k)*cr(k), where cr(k) are the complementary Riordan numbers A194589.
MAPLE
A056040 := n -> n!/iquo(n, 2)!^2:
A152271 := n -> `if`(n mod 2 = 0, 1, (n+1)/2):
A194590 := n -> (-1)^n*(A056040(n+1)*A152271(n)-2^n)/2:
MATHEMATICA
sf[n_] := n!/Quotient[n, 2]!^2;
a[n_] := (-1)^n (sf[n + 1] * If[EvenQ[n], 1, (n + 1)/2] - 2^n)/2;
Table[a[n], {n, 0, 32}] (* Jean-François Alcover, Jun 26 2019 *)
CROSSREFS
Cf. A107373 (has offset 1).
Sequence in context: A191319 A018497 A178748 * A107373 A336579 A176662
KEYWORD
sign
AUTHOR
Peter Luschny, Aug 30 2011
STATUS
approved