|
Search: id:A092865
|
|
|
| A092865 |
|
Nonzero elements in Klee's identity Sum[(-1)^k binomial[n,k]binomial[n+k,m],{k,0,n}] == (-1)^n binomial[n,m-n]. |
|
+0
2
|
|
| 1, -1, -1, 1, 2, -1, 1, -3, 1, -3, 4, -1, -1, 6, -5, 1, 4, -10, 6, -1, 1, -10, 15, -7, 1, -5, 20, -21, 8, -1, -1, 15, -35, 28, -9, 1, 6, -35, 56, -36, 10, -1, 1, -21, 70, -84, 45, -11, 1, -7, 56, -126, 120, -55, 12, -1, -1, 28, -126, 210, -165, 66, -13, 1, 8, -84, 252, -330, 220, -78, 14, -1, 1, -36, 210, -462, 495
(list; graph; listen)
|
|
|
OFFSET
|
0,5
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Klee's Identity
|
|
EXAMPLE
|
1; -1; -1, 1; 2, -1; 1, -3, 1; -3, 4, -1; -1, 6, -5, 1; 4, -10, 6, -1; ...
|
|
MATHEMATICA
|
Flatten[Table[(-1)^n Binomial[n, m-n], {m, 0, 20}, {n, Ceiling[m/2], m}]]
|
|
CROSSREFS
|
Sequence in context: A136405 A035667 A102426 this_sequence A098925 A052920 A089141
Adjacent sequences: A092862 A092863 A092864 this_sequence A092866 A092867 A092868
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Eric Weisstein (eric(AT)weisstein.com), Mar 07, 2004
|
|
|
Search completed in 0.002 seconds
|
