A335487 Number of (1,1)-matching permutations of the prime indices of n.
0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 3, 0, 0, 0, 1, 0, 3, 0, 3, 0, 0, 0, 4, 1, 0, 1, 3, 0, 0, 0, 1, 0, 0, 0, 6, 0, 0, 0, 4, 0, 0, 0, 3, 3, 0, 0, 5, 1, 3, 0, 3, 0, 4, 0, 4, 0, 0, 0, 12, 0, 0, 3, 1, 0, 0, 0, 3, 0, 0, 0, 10, 0, 0, 3, 3, 0, 0, 0, 5, 1, 0, 0, 12, 0, 0
Offset: 1
Keywords
Examples
The a(n) permutations for n = 4, 12, 24, 48, 36, 72, 60: (11) (112) (1112) (11112) (1122) (11122) (1123) (121) (1121) (11121) (1212) (11212) (1132) (211) (1211) (11211) (1221) (11221) (1213) (2111) (12111) (2112) (12112) (1231) (21111) (2121) (12121) (1312) (2211) (12211) (1321) (21112) (2113) (21121) (2131) (21211) (2311) (22111) (3112) (3121) (3211)
Links
- Wikipedia, Permutation pattern
- Gus Wiseman, Sequences counting and ranking compositions by the patterns they match or avoid.
Crossrefs
Positions of zeros are A005117 (squarefree numbers).
The case where the match must be contiguous is A333175.
The avoiding version is A335489.
The (1,1,1)-matching case is A335510.
Patterns are counted by A000670.
Permutations of prime indices are counted by A008480.
(1,1)-matching patterns are counted by A019472.
(1,1)-matching compositions are counted by A261982.
STC-numbers of permutations of prime indices are A333221.
Patterns matched by standard compositions are counted by A335454.
Dimensions of downsets of standard compositions are A335465.
(1,1)-matching compositions are ranked by A335488.
Programs
-
Mathematica
primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]; Table[Length[Select[Permutations[primeMS[n]],!UnsameQ@@#&]],{n,100}]
Comments