|
Search: id:A117760
|
|
|
| A117760 |
|
Expansion of 1/(1 - x - x^3 - x^5 - x^7). |
|
+0
1
|
|
| 1, 1, 1, 2, 3, 5, 8, 13, 21, 33, 53, 85, 136, 218, 349, 559, 895, 1433, 2295, 3675, 5885, 9424, 15091, 24166, 38698, 61969, 99234, 158908, 254467, 407490, 652533, 1044932, 1673299, 2679533, 4290863, 6871162, 11003117, 17619812, 28215439, 45182718
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
FORMULA
|
a(n)=a(n-1)+a(n-3)+a(n-5)+a(n-7); a(0)=0, a(1)=1, a(2)=1, a(3)=1, a(4)=2, a(5)=3, a(6)=5.
|
|
MAPLE
|
a[0]:=0:a[1]:=1:a[2]:=1:a[3]:=1:a[4]:=2:a[5]:=3:a[6]:=5:for n from 7 to 45 do a[n]:=a[n-1]+a[n-3]+a[n-5]+a[n-7] od: seq(a[n], n=0..45);
|
|
MATHEMATICA
|
CoefficientList[ Series[1/(1 - x - x^3 - x^5 - x^7), {x, 0, 40}], x]
|
|
PROGRAM
|
(PARI) {default(seriesprecision, 41); for(n=0, 40, print1(polcoeff(taylor(1/(1 - x - x^3 - x^5 - x^7), x), n), ", "))}
|
|
CROSSREFS
|
Sequence in context: A011185 A055806 A023438 this_sequence A111917 A013986 A121343
Adjacent sequences: A117757 A117758 A117759 this_sequence A117761 A117762 A117763
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Apr 14 2006
|
|
EXTENSIONS
|
Edited and extended by N. J. A. Sloane (njas(AT)research.att.com), Apr 20 2006
|
|
|
Search completed in 0.002 seconds
|
