|
|
A220493
|
|
Fibonacci 15-step numbers, a(n) = a(n-1) + a(n-2) + ... + a(n-15).
|
|
2
|
|
|
1, 1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32767, 65533, 131064, 262124, 524240, 1048464, 2096896, 4193728, 8387328, 16774400, 33548288, 67095552, 134189056, 268374016, 536739840, 1073463296, 2146893825, 4293722117, 8587313170
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
Also called Pentadecanacci numbers. In previous similar sequences, a(1), ..., a(n-1) have been set equal to zero and a(n)=1. For example, A168084 (Fibonacci 13-step numbers) has 12 0's as the first 12 terms and a(13)=1.
|
|
LINKS
|
Index entries for linear recurrences with constant coefficients, signature (1,1,1,1,1,1,1,1,1,1,1,1,1,1,1).
|
|
FORMULA
|
|
|
MAPLE
|
f:= gfun:-rectoproc({a(n) = add(a(n-i), i=1..15), seq(a(n)=0, n=-14..0), a(1)=1}, a(n), remember):
|
|
MATHEMATICA
|
FibonacciSequence[n_, kMax_] := Module[{a, s}, a = Join[{1}, Table[0, {n - 1}]]; lst = {}; Table[s = Plus @@ a; a = RotateLeft[a]; a[[n]] = s, {k, 1, kMax}]]; FibonacciSequence[15, 50] (* T. D. Noe, Feb 20 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|