|
| |
|
|
A100389
|
|
Bell(n) - Fibonacci(n).
|
|
0
| |
|
|
1, 0, 1, 3, 12, 47, 195, 864, 4119, 21113, 115920, 678481, 4213453, 27644204, 190898945, 1382957935, 10480141160, 82864868207, 682076803575, 5832742200876, 51724158228607, 474869816145805, 4506715738429612
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
MAPLE
| seq(bell(x)-fibonacci(x), x=0..30);
|
|
|
MATHEMATICA
| Table[BellB[n, 1] - Fibonacci[n, 1], {n, 0, 22}] [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Jul 16 2009]
|
|
|
PROG
| sage: [bell_number(m)-fibonacci(m) for m in xrange (0, 23)] - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Jul 06 2008
|
|
|
CROSSREFS
| Cf. A000110, A000045.
Sequence in context: A088132 A122450 A179648 * A151163 A151164 A151165
Adjacent sequences: A100386 A100387 A100388 * A100390 A100391 A100392
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jorge Coveiro (jorgecoveiro(AT)yahoo.com), Dec 30 2004
|
| |
|
|
