OFFSET
1,2
COMMENTS
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
LINKS
EXAMPLE
The sequence of terms together with their prime indices begins:
1: {}
15: {2,3}
33: {2,5}
51: {2,7}
55: {3,5}
85: {3,7}
91: {4,6}
93: {2,11}
123: {2,13}
155: {3,11}
161: {4,9}
165: {2,3,5}
177: {2,17}
187: {5,7}
201: {2,19}
203: {4,10}
205: {3,13}
249: {2,23}
255: {2,3,7}
295: {3,17}
MATHEMATICA
Select[Range[1000], !PrimeQ[#]&&SquareFreeQ[#]&&SameQ@@PrimeOmega/@PrimePi/@First/@FactorInteger[#]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 30 2019
STATUS
approved