|
| |
|
|
A137166
|
|
Sequence equals its 4th differences shifted by one index.
|
|
0
| |
|
|
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; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| Binomial transform yields A079398 without the initial (0,1,1,1). - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 09 2008
|
|
|
LINKS
| Index to sequences with linear recurrences with constant coefficients, signature (4,-6,5,-1).
|
|
|
FORMULA
| a(n)=4a(n-1)-6a(n-2)+5a(n-3)-a(n-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
| Sequence in context: A139333 A099444 A132402 * A101890 A134195 A079444
Adjacent sequences: A137163 A137164 A137165 * A137167 A137168 A137169
|
|
|
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
Edited by Bruno Berselli, Apr 07 2011
|
| |
|
|
