cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A386584 Triangle read by rows where T(n,k) is the number of length k>=0 integer partitions of n having no permutation without any adjacent equal parts (inseparable).

Original entry on oeis.org

0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 2, 1, 1, 1, 0, 0, 1, 0, 2, 1, 2, 1, 1, 0, 0, 0, 1, 2, 2, 2, 2, 1, 1, 0, 0, 1, 0, 3, 2, 4, 2, 2, 1, 1, 0, 0, 0, 0, 3, 2, 4, 3, 3, 2, 1, 1
Offset: 0

Views

Author

Gus Wiseman, Aug 05 2025

Keywords

Comments

A multiset is inseparable iff it has no anti-run permutations, where an anti-run is a sequence without any adjacent equal parts. Inseparable partitions (A325535) are different from partitions of inseparable type (A386586).

Examples

			Row n = 10 counts the following partitions:
  . . 55 . 7111 61111 511111 4111111 31111111 211111111 1111111111
           4222 22222 421111 3211111 22111111
           3331       331111
                      222211
Triangle begins:
  0
  0  0
  0  0  1
  0  0  0  1
  0  0  1  0  1
  0  0  0  0  1  1
  0  0  1  1  1  1  1
  0  0  0  0  2  1  1  1
  0  0  1  0  2  1  2  1  1
  0  0  0  1  2  2  2  2  1  1
  0  0  1  0  3  2  4  2  2  1  1
  0  0  0  0  3  2  4  3  3  2  1  1
  0  0  1  1  3  2  6  4  4  3  2  1  1
  0  0  0  0  4  3  6  5  6  4  3  2  1  1
  0  0  1  0  4  3  9  6  8  5  5  3  2  1  1
  0  0  0  1  4  3  9  7 10  8  6  5  3  2  1  1
  0  0  1  0  5  3 12  8 13  9 10  6  5  3  2  1  1
  0  0  0  0  5  4 12 10 16 12 12  9  7  5  3  2  1  1
  0  0  1  1  5  4 16 11 20 15 17 12 10  7  5  3  2  1  1
  0  0  0  0  6  4 16 13 24 18 21 16 14 10  7  5  3  2  1  1
  0  0  1  0  6  4 20 14 29 21 28 20 19 13 11  7  5  3  2  1  1
		

Crossrefs

Inseparable case of A008284 or A072233.
Row sums are A325535, ranked by A335448.
For separable instead of inseparable we have A386583, sums A325534, ranks A335433.
For separable type we have A386585, sums A336106, ranks A335127.
For inseparable type we have A386586, sums A025065, ranks A335126.
A003242 and A335452 count anti-runs, ranks A333489, patterns A005649.
A124762 gives inseparability of standard compositions, separability A333382.
A336103 counts normal separable multisets, inseparable A336102.
A386633 counts separable set partitions, row sums of A386635.
A386634 counts inseparable set partitions, row sums of A386636.

Programs

  • Mathematica
    insepQ[y_]:=Select[Permutations[y],Length[Split[#]]==Length[y]&]=={};
    Table[Length[Select[IntegerPartitions[n,{k}],insepQ]],{n,0,15},{k,0,n}]

Formula

T(n,k) = A072233(n,k) - A386583(n,k).