|
|
A022347
|
|
Fibonacci sequence beginning 0, 13.
|
|
1
|
|
|
0, 13, 13, 26, 39, 65, 104, 169, 273, 442, 715, 1157, 1872, 3029, 4901, 7930, 12831, 20761, 33592, 54353, 87945, 142298, 230243, 372541, 602784, 975325, 1578109, 2553434, 4131543, 6684977, 10816520, 17501497, 28318017, 45819514, 74137531, 119957045, 194094576, 314051621, 508146197
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
a={}; b=0; c=13; AppendTo[a, b]; AppendTo[a, c]; Do[b=b+c; AppendTo[a, b]; c=b+c; AppendTo[a, c], {n, 4!}]; a (* Vladimir Joseph Stephan Orlovsky, Sep 17 2008 *)
LinearRecurrence[{1, 1}, {0, 13}, 40] (* Harvey P. Dale, Jan 24 2013 *)
|
|
PROG
|
(PARI) for(n=0, 50, print1(13*fibonacci(n), ", ")) \\ G. C. Greubel, Aug 25 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|