|
Search: id:A084081
|
|
|
| A084081 |
|
Sum of lists created by n substitutions k -> Range[k+1,0,-2] starting with {0}, counting down from k+1 to 0 step -2. |
|
+0
3
|
|
| 0, 1, 2, 5, 10, 24, 50, 121, 260, 637, 1400, 3468, 7752, 19380, 43890, 110561, 253000, 641355, 1480050, 3771885, 8765250, 22439040, 52451256, 134796060, 316663760, 816540124, 1926501200, 4982228488, 11798983280, 30593078076, 72690164850
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
Lengths of lists is A047749.
|
|
FORMULA
|
Equals A093951(n)-A047749(n).
|
|
EXAMPLE
|
lists {0}, {1}, {2, 0}, {3, 1, 1}, {4, 2, 0, 2, 0, 2, 0}
sum to 0, 1, 2, 5, 10
|
|
MATHEMATICA
|
Plus@@@Flatten/@NestList[ # /. k_Integer :> Range[k+1, 0, -2]&, {0}, 8]
|
|
CROSSREFS
|
Cf. A047749.
Cf. A093951, A047749.
Adjacent sequences: A084078 A084079 A084080 this_sequence A084082 A084083 A084084
Sequence in context: A049937 A026754 A032170 this_sequence A106376 A001431 A054866
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Wouter Meeussen (wouter.meeussen(AT)pandora.be), May 11 2003
|
|
|
Search completed in 0.002 seconds
|
