|
Search: id:A108140
|
|
|
| A108140 |
|
First countdown sequence. |
|
+0
1
|
|
| 1, 1, 1, 1, 0, 4, 17, 55, 161, 449, 1220, 3266, 8667, 22879, 60203, 158107, 414728, 1087064, 2848061, 7459703, 19535229, 51152749, 133933964, 350666854, 918095255, 2403665279, 6292975607, 16475382935, 43133369616, 112925043724
(list; graph; listen)
|
|
|
OFFSET
|
0,6
|
|
|
REFERENCES
|
Roger Bagula, Factoring Double Fibonacci Sequences, TFTN, 2000
|
|
FORMULA
|
F[n] = 4*F[n - 1] - 3*F[n - 2] - 2*F[n - 3] + F[n - 4] a(n) =Abs( F[n])
|
|
MATHEMATICA
|
F[1] = 1; F[2] = 1; F[3] = 1; F[4] = 1; F[n__] := F[n] = 4*F[n - 1] - 3*F[n - 2] - 2*F[n - 3] + F[n - 4] a = Table[Abs[F[n]], {n, 1, 50}]
|
|
CROSSREFS
|
Cf. A056015, A056016.
Sequence in context: A046995 A001585 A060262 this_sequence A121327 A027075 A034331
Adjacent sequences: A108137 A108138 A108139 this_sequence A108141 A108142 A108143
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 05 2005
|
|
|
Search completed in 0.002 seconds
|
