[go: up one dir, main page]

login
Revision History for A066375 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
a(n) = 6*binomial(n,4) + 3*binomial(n,3) + 4*binomial(n,2) - n + 2.
(history; published version)
#15 by Susanna Cuyler at Fri Jun 15 21:29:28 EDT 2018
STATUS

proposed

approved

#14 by Jon E. Schoenfield at Fri Jun 15 20:50:52 EDT 2018
STATUS

editing

proposed

#13 by Jon E. Schoenfield at Fri Jun 15 20:50:47 EDT 2018
NAME

a(n) = 6*binomial(n,4) + 3*binomial(n,3) + 4*binomial(n,2) - n + 2.

FORMULA

From Colin Barker, Apr 20 2012: (Start)

a(n) = (8 - 14*n + 13*n^2 - 4*n^3 + n^4)/4. G.f.: x*(1-x+4*x^2+2*x^4)/(1-x)^5. [_Colin Barker_, Apr 20 2012]

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

PROG

(PARI) { for (n=1, 1000, a=6*binomial(n, 4) + 3*binomial(n, 3) + 4*binomial(n, 2) - n + 2; write("b066375.txt", n, " ", a) ) } [From _\\ _Harry J. Smith_, Feb 11 2010]

STATUS

approved

editing

#12 by Harvey P. Dale at Sun Feb 05 13:05:26 EST 2017
STATUS

editing

approved

#11 by Harvey P. Dale at Sun Feb 05 13:05:22 EST 2017
LINKS

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

MATHEMATICA

Table[6Binomial[n, 4]+3Binomial[n, 3]+4Binomial[n, 2]-n+2, {n, 40}] (* or *) LinearRecurrence[{5, -10, 10, -5, 1}, {1, 4, 14, 40, 97}, 40] (* Harvey P. Dale, Feb 05 2017 *)

STATUS

approved

editing

#10 by Bruno Berselli at Fri Apr 20 08:59:37 EDT 2012
STATUS

editing

approved

#9 by Bruno Berselli at Fri Apr 20 08:59:30 EDT 2012
LINKS

Harry J. Smith, <a href="/A066375/b066375.txt">Table of n, a(n) for n = 1,...,1000</a>

STATUS

proposed

editing

#8 by Colin Barker at Fri Apr 20 08:58:20 EDT 2012
STATUS

editing

proposed

#7 by Colin Barker at Fri Apr 20 08:58:15 EDT 2012
FORMULA

a(n) = (8-14*n+13*n^2-4*n^3+n^4)/4. G.f.: x*(1-x+4*x^2+2*x^4)/(1-x)^5. [Colin Barker, Apr 20 2012]

KEYWORD

nonn,easy

STATUS

approved

editing

#6 by Russ Cox at Fri Mar 30 17:24:36 EDT 2012
PROG

(PARI) { for (n=1, 1000, a=6*binomial(n, 4) + 3*binomial(n, 3) + 4*binomial(n, 2) - n + 2; write("b066375.txt", n, " ", a) ) } [From _Harry J. Smith (hjsmithh(AT)sbcglobal.net), _, Feb 11 2010]

Discussion
Fri Mar 30
17:24
OEIS Server: https://oeis.org/edit/global/133