login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A330783 Number of set multipartitions (multisets of sets) of strongly normal multisets of size n, where a finite multiset is strongly normal if it covers an initial interval of positive integers with weakly decreasing multiplicities. 1
1, 1, 3, 8, 27, 94, 385, 1673, 8079, 41614 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

The (weakly) normal version is A116540.

LINKS

Table of n, a(n) for n=0..9.

EXAMPLE

The a(1) = 1 through a(3) = 8 set multipartitions:

  {{1}}  {{1,2}}    {{1,2,3}}

         {{1},{1}}  {{1},{1,2}}

         {{1},{2}}  {{1},{2,3}}

                    {{2},{1,3}}

                    {{3},{1,2}}

                    {{1},{1},{1}}

                    {{1},{1},{2}}

                    {{1},{2},{3}}

The a(4) = 27 set multipartitions:

  {{1},{1},{1},{1}}  {{1},{1},{1,2}}  {{1},{1,2,3}}  {{1,2,3,4}}

  {{1},{1},{1},{2}}  {{1},{1},{2,3}}  {{1,2},{1,2}}

  {{1},{1},{2},{2}}  {{1},{2},{1,2}}  {{1,2},{1,3}}

  {{1},{1},{2},{3}}  {{1},{2},{1,3}}  {{1},{2,3,4}}

  {{1},{2},{3},{4}}  {{1},{2},{3,4}}  {{1,2},{3,4}}

                     {{1},{3},{1,2}}  {{1,3},{2,4}}

                     {{1},{3},{2,4}}  {{1,4},{2,3}}

                     {{1},{4},{2,3}}  {{2},{1,3,4}}

                     {{2},{3},{1,4}}  {{3},{1,2,4}}

                     {{2},{4},{1,3}}  {{4},{1,2,3}}

                     {{3},{4},{1,2}}

MATHEMATICA

sps[{}]:={{}}; sps[set:{i_, ___}]:=Join@@Function[s, Prepend[#, s]&/@sps[Complement[set, s]]]/@Cases[Subsets[set], {i, ___}];

mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];

strnorm[n_]:=Flatten[MapIndexed[Table[#2, {#1}]&, #]]&/@IntegerPartitions[n];

Table[Length[Select[Join@@mps/@strnorm[n], And@@UnsameQ@@@#&]], {n, 0, 5}]

CROSSREFS

Allowing edges to be multisets gives is A035310.

The strict case is A318402.

The constant case is A000005.

The (weakly) normal version is A116540.

Unlabeled set multipartitions are A049311.

Set multipartitions of prime indices are A050320.

Set multipartitions of integer partitions are A089259.

Cf. A001055, A047968, A255906, A269134, A283877, A296119, A317775, A318360, A318362, A330625, A330628.

Sequence in context: A259811 A148841 A148842 * A148843 A319787 A148844

Adjacent sequences:  A330780 A330781 A330782 * A330784 A330785 A330786

KEYWORD

nonn,more

AUTHOR

Gus Wiseman, Jan 02 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 11 05:38 EDT 2020. Contains 336422 sequences. (Running on oeis4.)