Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

Revision History for A057088

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Scaled Chebyshev U-polynomials evaluated at i*sqrt(5)/2. Generalized Fibonacci sequence.
(history; published version)
#84 by Charles R Greathouse IV at Thu Sep 08 08:45:01 EDT 2022
PROG

(MAGMAMagma) I:=[1, 5]; [n le 2 select I[n] else 5*Self(n-1) + 5*Self(n-2): n in [0..30]]; // G. C. Greubel, Jan 16 2018

Discussion
Thu Sep 08
08:45
OEIS Server: https://oeis.org/edit/global/2944
#83 by N. J. A. Sloane at Sat Dec 07 12:18:22 EST 2019
PROG

(Sage) [lucas_number1(n, 5, -5) for n in xrangerange(1, 22)] # Zerinvary Lajos, Apr 24 2009

Discussion
Sat Dec 07
12:18
OEIS Server: https://oeis.org/edit/global/2837
#82 by Joerg Arndt at Wed Jan 17 03:34:18 EST 2018
STATUS

editing

approved

#81 by Joerg Arndt at Wed Jan 17 03:34:14 EST 2018
MATHEMATICA

Join[{a=0, b=1}, Table[c=5*b+5*a; a=b; b=c, {n, 100}]] (* Vladimir Joseph Stephan Orlovsky, Jan 16 2011 *)

STATUS

proposed

editing

#80 by G. C. Greubel at Wed Jan 17 02:12:51 EST 2018
STATUS

editing

proposed

#79 by G. C. Greubel at Wed Jan 17 02:12:42 EST 2018
MATHEMATICA

LinearRecurrence[{5, 5}, {1, 5}, 30] (* G. C. Greubel, Jan 16 2018 *)

PROG

(PARI) x='x+O('x^30); Vec(1/(1 - 5*x - 5*x^2)) \\ G. C. Greubel, Jan 16 2018

(MAGMA) I:=[1, 5]; [n le 2 select I[n] else 5*Self(n-1) + 5*Self(n-2): n in [0..30]]; // G. C. Greubel, Jan 16 2018

STATUS

approved

editing

#78 by N. J. A. Sloane at Tue Dec 26 21:28:17 EST 2017
STATUS

proposed

approved

#77 by Michel Marcus at Tue Dec 26 05:59:40 EST 2017
STATUS

editing

proposed

#76 by Michel Marcus at Tue Dec 26 05:59:32 EST 2017
LINKS

Eric Weisstein, 's World of Mathematics, <a href="http://mathworld.wolfram.com/HoradamSequence.html">Horadam Sequence</a>

STATUS

proposed

editing

#75 by Ehren Metcalfe at Thu Nov 23 23:42:05 EST 2017
STATUS

editing

proposed