login

Revision History for A199933

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

Showing entries 1-10 | older changes
#21 by Alois P. Heinz at Wed Dec 27 14:24:53 EST 2017
STATUS

reviewed

approved

#20 by Robert G. Wilson v at Wed Dec 27 12:26:30 EST 2017
STATUS

proposed

reviewed

#19 by Robert G. Wilson v at Wed Dec 27 12:26:24 EST 2017
STATUS

editing

proposed

#18 by Robert G. Wilson v at Wed Dec 27 12:26:20 EST 2017
MATHEMATICA

CoefficientList[ Series[(1 + 2x + 2x^2)/(1 + x + 5x^2 - x^3 + x^4), {x, 0, 33}], x] (* or *)LinearRecurrence[{-1, -5, 1, -1}, {1, 1, -4, 0}, 33] (* _Robert G. Wilson v_, Dec 27 2017 *)

LinearRecurrence[{-1, -5, 1, -1}, {1, 1, -4, 0}, 33] (* Robert G. Wilson v, Dec 27 2017 *)

#17 by Robert G. Wilson v at Wed Dec 27 12:25:45 EST 2017
MATHEMATICA

CoefficientList[ Series[(1 + 2x + 2x^2)/(1 + x + 5x^2 - x^3 + x^4), {x, 0, 33}], x] (* or *)LinearRecurrence[{-1, -5, 1, -1}, {1, 1, -4, 0}, 33] (* Robert G. Wilson v, Dec 27 2017 *)

STATUS

proposed

editing

#16 by Colin Barker at Wed Dec 27 11:28:36 EST 2017
STATUS

editing

proposed

#15 by Colin Barker at Wed Dec 27 11:28:10 EST 2017
LINKS

Colin Barker, <a href="/A199933/b199933.txt">Table of n, a(n) for n = 0..1000</a>

FORMULA

From Colin Barker, Dec 27 2017: (Start)

G.f.: (1 + 2*x + 2*x^2) / (1 + x + 5*x^2 - x^3 + x^4).

a(n) = -a(n-1) - 5*a(n-2) + a(n-3) - a(n-4) for n>3.

(End)

PROG

(PARI) Vec((1 + 2*x + 2*x^2) / (1 + x + 5*x^2 - x^3 + x^4) + O(x^40)) \\ Colin Barker, Dec 27 2017

STATUS

approved

editing

#14 by N. J. A. Sloane at Wed Dec 27 01:36:26 EST 2017
STATUS

proposed

approved

#13 by Michel Marcus at Wed Dec 27 00:49:50 EST 2017
STATUS

editing

proposed

#12 by Michel Marcus at Wed Dec 27 00:49:44 EST 2017
LINKS

<a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (-1,-5,1,-1).

STATUS

proposed

editing