|
| |
|
|
A104510
|
|
G.f.: Product((1-2*(-x)^i)/(1-(-x)^i)^2,i=1..infinity).
|
|
1
| |
|
|
0, -1, 2, -4, 4, -7, 4, -5, 0, 5, -18, 23, -46, 65, -82, 108, -132, 152, -164, 168, -144, 132, -48, -39, 212, -365, 658, -947, 1382, -1800, 2394, -2947, 3644, -4289, 5102, -5687, 6392, -6820, 7112, -7139, 6776, -5836, 4338, -2036, -1342, 5585, -11392, 18513, -27456, 37876, -51072, 65488, -82982, 101898
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
FORMULA
| a(n) = Sum (k(1)-1)*(k(2)-1)*...*(k(n)-1), where the sum is taken over all (k(1), k(2), ..., k(n)) such that k(1)+2*k(2)+...+n*k(n) = n, k(i)>=0, i=1...n.
G.f.: Product((1-(-x)^i)^A052823(i), i=1..infinity). - James A. Sellers (sellersj(AT)math.psu.edu), Apr 22 2005
|
|
|
MAPLE
| gf:=product((1-2*(-x)^i)/(1-(-x)^i)^2, i=1..100): s:=series(gf, x, 100): for n from 1 to 99 do printf(`%d, `, coeff(s, x, n)) od: (Sellers)
|
|
|
CROSSREFS
| Cf. A000712, A077285.
Cf. A104575.
Sequence in context: A096612 A177153 A164719 * A082515 A062855 A103622
Adjacent sequences: A104507 A104508 A104509 * A104511 A104512 A104513
|
|
|
KEYWORD
| easy,sign
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Apr 19 2005
|
|
|
EXTENSIONS
| More terms from James A. Sellers (sellersj(AT)math.psu.edu), Apr 22 2005
|
| |
|
|
