The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A339228 Triangle read by rows: T(n,k) is the number of oriented series-parallel networks with n colored elements using exactly k colors. 10
1, 2, 3, 5, 22, 19, 15, 146, 321, 195, 48, 970, 4116, 5972, 2791, 167, 6601, 48245, 125778, 135235, 51303, 602, 46012, 546570, 2281528, 4238415, 3609966, 1152019, 2256, 328188, 6118320, 38437972, 109815445, 157612413, 111006329, 30564075 (list; table; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
A series configuration is a unit element or an ordered concatenation of two or more parallel configurations and a parallel configuration is a unit element or a multiset of two or more series configurations. T(n, k) is the number of series or parallel configurations with n unit elements of k colors using each color at least once.
LINKS
EXAMPLE
Triangle begins:
1;
2, 3;
5, 22, 19;
15, 146, 321, 195;
48, 970, 4116, 5972, 2791;
167, 6601, 48245, 125778, 135235, 51303;
602, 46012, 546570, 2281528, 4238415, 3609966, 1152019;
...
PROG
(PARI) \\ R(n, k) gives colorings using at most k colors as a vector.
EulerT(v)={Vec(exp(x*Ser(dirmul(v, vector(#v, n, 1/n))))-1, -#v)}
R(n, k)={my(Z=k*x, p=Z+O(x^2)); for(n=2, n, p=x*Ser(EulerT(Vec(p^2/(1+p)+Z)))); Vec(p)}
M(n)={my(v=vector(n, k, R(n, k)~)); Mat(vector(n, k, sum(i=1, k, (-1)^(k-i)*binomial(k, i)*v[i])))}
{my(T=M(8)); for(n=1, #T~, print(T[n, 1..n]))}
CROSSREFS
Columns 1..2 are A003430, A339227.
Row sums are A339229.
Main diagonal is A048172.
Sequence in context: A093522 A352124 A093499 * A013639 A047995 A244862
KEYWORD
nonn,tabl
AUTHOR
Andrew Howroyd, Nov 28 2020
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 12 19:25 EDT 2024. Contains 372494 sequences. (Running on oeis4.)