|
%I #18 Sep 18 2013 03:45:32
%S 1,1,1,0,2,5,4,1,0,0,12,56,111,123,84,36,9,1,0,0,0,128,944,3264,7096,
%T 10936,12687,11400,8004,4368,1820,560,120,16,1,0,0,0,0,2000,21104,
%U 109400,373920,950725,1915405,3168880,4394760,5169230,5188390,4454000
%N Irregular triangular array read by rows. T(n,k) is the number of weakly connected relations on n labeled nodes with k arcs. (n>=0, 0<=k<=n^2)
%C Row sums = A062738.
%F E.g.f.: Log[Sum_{n>=0} (1+y)^(n^2) x^n/n!] + 1
%e 1,
%e 1, 1,
%e 0, 2, 5, 4, 1,
%e 0, 0, 12, 56, 111, 123, 84, 36, 9, 1,
%e 0, 0, 0, 128, 944, 3264, 7096, 10936, 12687, 11400, 8004, 4368, 1820, 560, 120, 16, 1
%t nn=6; s=Sum[(1+y)^(n^2) x^n/n!, {n,0,nn}]; Range[0,nn]! CoefficientList[Series[ Log[s]+1, {x,0,nn}], {x,y}] //Grid
%Y Cf. A062735.
%K nonn,tabf
%O 0,5
%A _Geoffrey Critzer_, Oct 07 2012
|
