The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A180671

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A180671

a(n) = Fibonacci(n+6) - Fibonacci(6).
(history; published version)

#43 by Charles R Greathouse IV at Thu Sep 08 08:45:54 EDT 2022

PROG

(MAGMAMagma) [Fibonacci(n+6)-Fibonacci(6): n in [0..40]]; // Vincenzo Librandi, Apr 24 2011

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#42 by Michel Marcus at Sun Apr 19 05:48:54 EDT 2020

STATUS

reviewed

approved

#41 by Joerg Arndt at Sun Apr 19 05:45:15 EDT 2020

STATUS

proposed

reviewed

#40 by F. Chapoton at Sun Apr 19 05:38:02 EDT 2020

STATUS

editing

proposed

#39 by F. Chapoton at Sun Apr 19 05:37:53 EDT 2020

PROG

(PARI) for(n=1, 40, print(fibonacci(n+6)-fibonacci(6))); // _\\ _Anton Mosunov_, Mar 02 2017

STATUS

approved

editing

Discussion

Sun Apr 19

05:38

F. Chapoton: fix comment symbol in pari code

#38 by Susanna Cuyler at Sat Jul 13 16:57:43 EDT 2019

STATUS

proposed

approved

#37 by G. C. Greubel at Sat Jul 13 16:48:33 EDT 2019

STATUS

editing

proposed

#36 by G. C. Greubel at Sat Jul 13 16:48:07 EDT 2019

FORMULA

a(n) = 2*a(n-1) - a(n-3). (End)

(End)

MAPLE

nmax:=3340: with(combinat): for n from 0 to nmax do a(n):=fibonacci(n+6)-fibonacci(6) od: seq(a(n), n=0..nmax);

MATHEMATICA

f[n_] := Fibonacci[n+6] - Fibonacci[6]; Array[f, 34, 40, 0] (* or *)

LinearRecurrence[{2, 0, -1}, {0, 5, 13}, 3541] (* or *)

CoefficientList[ Series[x (3 x 3x+ 5)/(x^3 - 2 x 2x+ 1), {x, 0, 3440}], x] (* Robert G. Wilson v, Apr 11 2017 *)

PROG

(PARI) for (n=1, 40, print(fibonacci(n+6)-fibonacci(6))); // Anton Mosunov, Mar 02 2017

(PARI) concat(0, Vec(x*(5 + 3*x)/((1 - x)*(1 - x - x^2)) + O(x^3040))) \\ Colin Barker, Apr 20 2017

(Sage) [fibonacci(n+6)-8 for n in (0..40)] # G. C. Greubel, Jul 13 2019

(GAP) List([0..40], n-> Fibonacci(n+6)-8) # G. C. Greubel, Jul 13 2019

STATUS

approved

editing

#35 by Alois P. Heinz at Thu Apr 20 11:21:38 EDT 2017

STATUS

proposed

approved

#34 by Colin Barker at Thu Apr 20 10:46:14 EDT 2017

STATUS

editing

proposed