Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #11 Aug 20 2017 14:53:33
%S 0,1,56,381,1192,2705,5136,8701,13616,20097,28360,38621,51096,66001,
%T 83552,103965,127456,154241,184536,218557,256520,298641,345136,396221,
%U 452112,513025,579176,650781,728056,811217,900480,996061,1098176,1207041,1322872,1445885
%N a(n) = (3!)^3 * [z^3] hypergeom([], [1,1], z)^n.
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1).
%F O.g.f.: x*(1 + 52*x + 163*x^2) / (1 - x)^4.
%F a(n) = 46*n - 81*n^2 + 36*n^3.
%F a(n) = [x^n] (x + 52*x^2 + 163*x^3) / (1 - x)^4.
%p a := n -> 46*n - 81*n^2 + 36*n^3: seq(a(n), n=0..35);
%t Table[46 n - 81 n^2 + 36 n^3, {n, 0, 40}] (* _Bruno Berselli_, Jun 06 2017 *)
%t LinearRecurrence[{4,-6,4,-1},{0,1,56,381},40] (* _Harvey P. Dale_, Aug 20 2017 *)
%Y Column 3 of A287698.
%K nonn,easy
%O 0,3
%A _Peter Luschny_, Jun 01 2017