%I #10 Aug 08 2017 11:50:56
%S 35,340,1750,6440,19110,48720,110880,231000,448305,820820,1431430,
%T 2395120,3867500,6054720,9224880,13721040,19975935,28528500,40042310,
%U 55326040,75356050,101301200,134550000,176740200,229790925,295937460
%N Third right hand column of triangle A163934
%H G. C. Greubel, <a href="/A163935/b163935.txt">Table of n, a(n) for n = 3..1000</a>
%F a(n) = (n-2)*(n-1)*(n)*stirling1(n+2,n)/3!.
%F G.f.: x^3*(35 + 10*x^2 + 60*x)/(1 - x)^8.
%p nmax:=28; mmax:=nmax: with(combinat, stirling1): for n from 1 to nmax do for m from 1 to n do a(n,m):=(-1)^(n+m)*m*(m+1)*(m+2)*stirling1(n+2,m+2)/3! od; od: seq(a(n,n-2),n=3..nmax);
%t CoefficientList[Series[x^3 (35 + 60 x + 10 x^2)/(1 - x)^8, {x, 0, 50}], x] (* _G. C. Greubel_, Aug 08 2017 *)
%o (PARI) x='x+O('x^50); Vec(x^3*(35 + 60*x + 10*x^2)/(1-x)^8) \\ _G. C. Greubel_, Aug 08 2017
%Y Cf. A048994 (Stirling1).
%Y Equals the third right hand column of triangle A163934.
%Y A000292 and A027777 are the first and second right hand columns.
%K nonn,easy
%O 3,1
%A _Johannes W. Meijer_, Aug 13 2009
|