The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A287700 a(n) = (4!)^3 * [z^4] hypergeom([], [1,1], z)^n. 2
 0, 1, 346, 6219, 36628, 124405, 316206, 672511, 1267624, 2189673, 3540610, 5436211, 8006076, 11393629, 15756118, 21264615, 28104016, 36473041, 46584234, 58663963, 72952420, 89703621, 109185406, 131679439, 157481208, 186900025, 220259026, 257895171, 300159244 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS Vincenzo Librandi, Table of n, a(n) for n = 0..1000 Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1). FORMULA O.g.f.: x*(1 + 341*x + 4499*x^2 + 8983*x^3)/(1 - x)^5. a(n) = -1899*n + 3916*n^2 - 2592*n^3 + 576*n^4. a(n) = [x^n] (x + 341*x^2 + 4499*x^3 + 8983*x^4) / (1 - x)^5. MAPLE a := n -> -1899*n + 3916*n^2 - 2592*n^3 + 576*n^4: seq(a(n), n=0..27); MATHEMATICA Table[-1899 n + 3916 n^2 - 2592 n^3 + 576 n^4, {n, 0, 30}] (* Bruno Berselli, Jun 06 2017 *) LinearRecurrence[{5, -10, 10, -5, 1}, {0, 1, 346, 6219, 36628}, 30] (* Vincenzo Librandi, Jul 20 2017 *) PROG (MAGMA) [-1899*n + 3916*n^2 - 2592*n^3 + 576*n^4: n in [0..30]]; // Vincenzo Librandi, Jul 20 2017 CROSSREFS Column 4 of A287698. Sequence in context: A063536 A045102 A225934 * A281163 A059074 A273805 Adjacent sequences:  A287697 A287698 A287699 * A287701 A287702 A287703 KEYWORD nonn,easy AUTHOR Peter Luschny, May 31 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 14 19:42 EDT 2020. Contains 336483 sequences. (Running on oeis4.)