|
Search: id:A137166
|
|
|
| A137166 |
|
Sequence equals its 4th differences shifted by one index. |
|
+0
1
|
|
| 1, 3, 7, 15, 32, 70, 156, 349, 778, 1728, 3833, 8505, 18884, 41943, 93160, 206897, 459459, 1020311, 2265815, 5031792, 11174374, 24815508, 55108933, 122382762, 271780616, 603555049, 1340341377, 2976555532, 6610168495, 14679492624
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Binomial transform yields A079398 without the initial (0,1,1,1). - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 09 2008
|
|
FORMULA
|
a(n)=4a(n-1)-6a(n-2)+5a(n-3)-a(n-4). O.g.f.: (1-x+x^2)/(1-4*x+6*x^2-5*x^3+x^4). - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 09 2008
G.f.: (x^2 - x + 1)/(x^4 - 5*x^3 + 6*x^2 - 4*x + 1) - Alexander R. Povolotsky (pevnev(AT)juno.com), Apr 08 2008
|
|
MATHEMATICA
|
s = ""; a = 0; b = 1; c = 1; d = 1; For[i = 0, i < 23, a = a + b; s = s <> ToString[a] <> ", "; b = b + c; c = c + d; d = d + a; i++ ]; Print[s]
|
|
CROSSREFS
|
Adjacent sequences: A137163 A137164 A137165 this_sequence A137167 A137168 A137169
Sequence in context: A139333 A099444 A132402 this_sequence A101890 A134195 A079444
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 03 2008
|
|
EXTENSIONS
|
Edited by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 09 2008
|
|
|
Search completed in 0.002 seconds
|
