Search: id:A003169 Results 1-1 of 1 results found. %I A003169 M2973 %S A003169 1,3,14,79,494,3294,22952,165127,1217270,9146746,69799476,539464358, %T A003169 4214095612,33218794236,263908187100,2110912146295,16985386737830, %U A003169 137394914285538,1116622717709012,9113225693455362,74659999210200292 %N A003169 Number of 2-line arrays; or number of P-graphs with 2n edges. %C A003169 First column of triangle A100326. - Paul D. Hanna (pauldhanna(AT)juno.com), Nov 16 2004 %D A003169 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). %D A003169 M. Bicknell and V. E. Hoggatt, Jr., Sequences of matrix inverses from Pascal, Catalan and related convolution arrays, Fib. Quart., 14 (1976), 224-232. %D A003169 L. Carlitz, Enumeration of two-line arrays, Fib. Quart., 11 (1973), 113-130. %D A003169 R. C. Read, On the enumeration of a class of plane multigraphs, Aequat. Math., 31 (1986), 47-63. %H A003169 INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 416 %F A003169 For formula see Read reference. %F A003169 a(n) = ( (324*n^2-708*n+360)*a(n-1) - (371*n^2-1831*n+2250)*a(n-2) + (20*n^2-130*n+210)*a(n-3) )/(16*n*(2*n-1)) for n>2, with a(0)=0, a(1)=1, a(2)=3. - Paul D. Hanna (pauldhanna(AT)juno.com), Nov 16 2004 %F A003169 G.f. satisfies: A(x) = x*(1+A(x))/(1-A(x))^2 where A(0)=0. G.f. satisfies: (1+A(x))/(1-A(x)) = 2*G003168(x)-1, where G003168 is the g.f. of A003168. - Paul D. Hanna (pauldhanna(AT)juno.com), Nov 16 2004 %F A003169 a(n) = (1/n)*Sum_{i=0..n-1} binomial(n,i)*binomial(3*n-i-2,n-i-1). - Vladeta Jovovic (vladeta(AT)eunet.rs), Sep 13 2006 %p A003169 a[0]:=0:a[1]:=1:a[2]:=3:for n from 3 to 30 do a[n]:=((324*n^2-708*n+360)*a[n-1] -(371*n^2-1831*n+2250)*a[n-2]+(20*n^2-130*n+210)*a[n-3])/(16*n*(2*n-1)) od:seq(a[n],n=1..25); (Deutsch) %o A003169 (PARI) {a(n)=if(n==0,0,if(n==1,1,if(n==2,3,( (324*n^2-708*n+360)*a(n-1) -(371*n^2-1831*n+2250)*a(n-2)+(20*n^2-130*n+210)*a(n-3))/(16*n*(2*n-1)) )))} (Hanna) %o A003169 (PARI) {a(n)=local(A=x+x*O(x^n));if(n==1,1, for(i=1,n,A=x*(1+A)/(1-A)^2); polcoeff(A,n))} %Y A003169 Cf. A003168, A100324, A100326. %Y A003169 Sequence in context: A074538 A001564 A059276 this_sequence A086621 A020089 A027614 %Y A003169 Adjacent sequences: A003166 A003167 A003168 this_sequence A003170 A003171 A003172 %K A003169 nonn,easy %O A003169 1,2 %A A003169 N. J. A. Sloane (njas(AT)research.att.com). %E A003169 More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Jan 31 2005 Search completed in 0.001 seconds