|
Search: id:A058307
|
|
|
| A058307 |
|
a(0)=0, a(1)=1, a(n)=a(n-2)+(n+1)*a(n-1). |
|
+0
5
|
|
| 0, 1, 3, 13, 68, 421, 3015, 24541, 223884, 2263381, 25121075, 303716281, 3973432728, 55931774473, 842950049823, 13543132571641, 231076203767720, 4172914800390601, 79516457411189139, 1594502063024173381, 33564059780918830140, 740003817243238436461
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
Numerator of convergent to BesselI(0,2)/BesselI(1,2) for which the continued fraction expansion is [1,2,3....,n] - Benoit Cloitre (benoit7848c(AT)orange.fr), Mar 27 2003
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n=0..100
Russell Walsmith, F Sets in Context: Q-Sets
|
|
FORMULA
|
a(2r + 1) = Sum[Binomial[r + c, r - c](r + c)!/(r - c)! - Binomial[r + c, r - c - 1](r + c + 1)!/(r - c)!, {c, 0, r}] and a(2r) = Sum[ - Binomial[r + c, r - c](r + c + 1)!/(r - c + 1)! + Binomial[r + c + 1, r - c](r + c + 1)! /(r - c)!, {c, 0, r}] - W. Meeussen (wouter.meeussen(AT)pandora.be), Feb 02 2001
|
|
MAPLE
|
A058307 := proc(n) option remember; if n <= 1 then n else A058307(n-2)+(n+1)*A058307(n-1); fi; end;
|
|
CROSSREFS
|
A column of A058294. Except for first term, -1 times row sums of A053495.
Cf. A001053, A060997.
Sequence in context: A000260 A125279 A121954 this_sequence A020107 A128079 A074534
Adjacent sequences: A058304 A058305 A058306 this_sequence A058308 A058309 A058310
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com), Dec 09 2000
|
|
|
Search completed in 0.002 seconds
|
