A335474 -id:A335474 - cp's OEIS frontend

A335458 Number of normal patterns contiguously matched by the n-th composition in standard order (A066099).

1, 2, 2, 3, 2, 3, 3, 4, 2, 3, 3, 5, 3, 5, 5, 5, 2, 3, 3, 5, 3, 5, 5, 7, 3, 5, 5, 8, 5, 8, 7, 6, 2, 3, 3, 5, 3, 4, 5, 7, 3, 5, 4, 7, 5, 7, 8, 9, 3, 5, 5, 8, 4, 8, 7, 11, 5, 8, 7, 11, 7, 11, 9, 7, 2, 3, 3, 5, 3, 4, 5, 7, 3, 5, 5, 7, 5, 7, 8, 9, 3, 5, 5, 8, 5, 7

Offset: 0

Gus Wiseman, Jun 21 2020

nonn

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

We define a (normal) pattern to be a finite sequence covering an initial interval of positive integers. Patterns are counted by A000670 and ranked by A333217. A sequence S is said to match a pattern P if there is a not necessarily contiguous subsequence of S whose parts have the same relative order as P. For example, (3,1,1,3) matches (1,1,2), (2,1,1), and (2,1,2), but avoids (1,2,1), (1,2,2), and (2,2,1).

			The a(180) = 7 patterns are: (), (1), (1,2), (2,1), (1,2,3), (2,1,2), (2,1,2,3).

Wikipedia, Permutation pattern
Gus Wiseman, Sequences counting and ranking compositions by the patterns they match or avoid.
Gus Wiseman, Statistics, classes, and transformations of standard compositions

The non-contiguous version is A335454.
Summing over indices with binary length n gives A335457(n).
The nonempty version is A335474.
Patterns are counted by A000670 and ranked by A333217.
The n-th composition has A124771(n) distinct consecutive subsequences.
Knapsack compositions are counted by A325676 and ranked by A333223.
The n-th composition has A333257(n) distinct subsequence-sums.
The n-th composition has A334299(n) distinct subsequences.
Minimal avoided patterns are counted by A335465.
Cf. A108917, A124767, A124770, A181796, A269134, A333218, A333222, A333628, A334030, A335456.

stc[n_]:=Reverse[Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]];
mstype[q_]:=q/.Table[Union[q][[i]]->i,{i,Length[Union[q]]}];
Table[Length[Union[mstype/@ReplaceList[stc[n],{_,s___,_}:>{s}]]],{n,0,30}]

a(n) = A335474(n) + 1.

A335434 Number of separable factorizations of n into factors > 1.

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 4, 1, 2, 2, 3, 1, 4, 1, 4, 2, 2, 1, 6, 1, 2, 2, 4, 1, 5, 1, 5, 2, 2, 2, 8, 1, 2, 2, 6, 1, 5, 1, 4, 4, 2, 1, 10, 1, 4, 2, 4, 1, 6, 2, 6, 2, 2, 1, 11, 1, 2, 4, 6, 2, 5, 1, 4, 2, 5, 1, 15, 1, 2, 4, 4, 2, 5, 1, 10, 3, 2, 1, 11, 2

Offset: 1

Gus Wiseman, Jul 03 2020

nonn

A multiset is separable if it has a permutation that is an anti-run, meaning there are no adjacent equal parts.

			The a(n) factorizations for n = 2, 6, 16, 12, 30, 24, 36, 48, 60:
  2  6    16     12     30     24     36       48       60
     2*3  2*8    2*6    5*6    3*8    4*9      6*8      2*30
          2*2*4  3*4    2*15   4*6    2*18     2*24     3*20
                 2*2*3  3*10   2*12   3*12     3*16     4*15
                        2*3*5  2*2*6  2*2*9    4*12     5*12
                               2*3*4  2*3*6    2*3*8    6*10
                                      3*3*4    2*4*6    2*5*6
                                      2*2*3*3  3*4*4    3*4*5
                                               2*2*12   2*2*15
                                               2*2*3*4  2*3*10
                                                        2*2*3*5

The version for partitions is A325534.
The inseparable version is A333487.
The version for multisets with prescribed multiplicities is A335127.
Factorizations are A001055.
Anti-run compositions are A003242.
Inseparable partitions are A325535.
Anti-runs are ranked by A333489.
Separable partitions are ranked by A335433.
Inseparable partitions are ranked by A335448.
Anti-run permutations of prime indices are A335452.
Cf. A106351, A292884, A295370, A333628, A333755, A335463, A335125, A335126, A335407, A335457, A335474, A335516, A335838.

facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
Table[Length[Select[facs[n],Select[Permutations[#],!MatchQ[#,{_,x_,x_,_}]&]!={}&]],{n,100}]

A333487(n) + a(n) = A001055(n).

A333487 Number of inseparable factorizations of n into factors > 1.

Original entry on oeis.org

0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 2, 0, 0, 0, 0, 0, 0

Offset: 1

Gus Wiseman, Jul 01 2020

nonn

A multiset is separable if it has a permutation that is an anti-run, meaning there are no adjacent equal parts.

			The a(n) factorizations for n = 4, 16, 96, 144, 64, 192:
  2*2  4*4      2*2*2*12     12*12        8*8          3*4*4*4
       2*2*2*2  2*2*2*2*6    2*2*2*18     4*4*4        2*2*2*24
                2*2*2*2*2*3  2*2*2*2*9    2*2*2*8      2*2*2*2*12
                             2*2*2*2*3*3  2*2*2*2*4    2*2*2*2*2*6
                                          2*2*2*2*2*2  2*2*2*2*3*4
                                                       2*2*2*2*2*2*3

The version for partitions is A325535.
The version for multisets with prescribed multiplicities is A335126.
The separable version is A335434.
Anti-run compositions are A003242.
Anti-runs are ranked by A333489.
Separable partitions are ranked by A335433.
Inseparable partitions are ranked by A335448.
Anti-run permutations of prime indices are A335452.
Patterns contiguously matched by compositions are A335457.
Cf. A106351, A292884, A295370, A333628, A333755, A335463, A335125, A335127, A335407, A335474, A335516, A335838.

facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
Table[Length[Select[facs[n],Select[Permutations[#],!MatchQ[#,{_,x_,x_,_}]&]=={}&]],{n,100}]

a(n) + A335434(n) = A001055(n).

A335838 Number of normal patterns contiguously matched by integer partitions of n.

Original entry on oeis.org

1, 2, 5, 9, 18, 31, 54, 89, 145, 225, 349, 524, 778, 1137, 1645, 2330, 3293, 4586, 6341, 8676, 11794, 15880, 21292, 28298, 37419, 49163, 64301, 83576, 108191, 139326, 178699, 228183, 290286, 367760, 464374, 584146, 732481, 915468, 1140773, 1417115, 1755578

Offset: 0

Gus Wiseman, Jun 27 2020

nonn

We define a (normal) pattern to be a finite sequence covering an initial interval of positive integers. Patterns are counted by A000670 and ranked by A333217. A sequence S is said to contiguously match a pattern P if there is a contiguous subsequence of S whose parts have the same relative order as P. For example, (3,1,1,3) contiguously matches (1,1,2) and (2,1,1) but not (2,1,2), (1,2,1), (1,2,2), or (2,2,1).

			The patterns contiguously matched by (3,2,2,1) are: (), (1), (1,1), (2,1), (2,1,1), (2,2,1), (3,2,2,1). Note that (3,2,1) is not contiguously matched. See A335837 for a larger example.

Wikipedia, Permutation pattern
Gus Wiseman, Sequences counting and ranking compositions by the patterns they match or avoid.

The version for compositions in standard order is A335474.
The version for compositions is A335457.
The not necessarily contiguous version is A335837.
Patterns are counted by A000670 and ranked by A333217.
Patterns contiguously matched by prime indices are counted by A335516.
Contiguous divisors are counted by A335519.
Minimal patterns avoided by prime indices are counted by A335550.
Cf. A056986, A108917, A333257, A335454, A335456, A335458, A335549.

mstype[q_]:=q/.Table[Union[q][[i]]->i,{i,Length[Union[q]]}];
Table[Sum[Length[Union[mstype/@ReplaceList[y,{_,s___,_}:>{s}]]],{y,IntegerPartitions[n]}],{n,0,8}]

More terms from Jinyuan Wang, Jun 27 2020

cp's OEIS Frontend

A335458 Number of normal patterns contiguously matched by the n-th composition in standard order (A066099).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A335434 Number of separable factorizations of n into factors > 1.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A333487 Number of inseparable factorizations of n into factors > 1.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A335838 Number of normal patterns contiguously matched by integer partitions of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions