OFFSET
1,2
COMMENTS
EXAMPLE
The terms together with their prime indices begin:
1: {} 35: {3,4} 69: {2,9} 105: {2,3,4}
3: {2} 37: {12} 71: {20} 107: {28}
5: {3} 39: {2,6} 73: {21} 109: {29}
7: {4} 41: {13} 77: {4,5} 111: {2,12}
11: {5} 43: {14} 79: {22} 113: {30}
13: {6} 47: {15} 83: {23} 115: {3,9}
15: {2,3} 49: {4,4} 85: {3,7} 119: {4,7}
17: {7} 51: {2,7} 87: {2,10} 121: {5,5}
19: {8} 53: {16} 89: {24} 123: {2,13}
21: {2,4} 55: {3,5} 91: {4,6} 127: {31}
23: {9} 57: {2,8} 93: {2,11} 129: {2,14}
25: {3,3} 59: {17} 95: {3,8} 131: {32}
29: {10} 61: {18} 97: {25} 133: {4,8}
31: {11} 65: {3,6} 101: {26} 137: {33}
33: {2,5} 67: {19} 103: {27} 139: {34}
MATHEMATICA
pq[y_]:=Length[Select[Range[Length[y]], #==y[[#]]&]];
Select[Range[100], pq[Flatten[Cases[FactorInteger[#], {p_, k_}:>Table[PrimePi[p], {k}]]]]==0&]
CROSSREFS
* = unproved
These are the zeros of A352822.
A114088 counts partitions by excedances.
A122111 represents partition conjugation using Heinz numbers.
A238352 counts reversed partitions by fixed points.
A352833 counts partitions by fixed points.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Apr 06 2022
STATUS
approved