OFFSET
1,2
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
a(n) ~ n log n. - Charles R Greathouse IV, Oct 28 2021
EXAMPLE
10 = 2*5 has prime multiplicities (1,1) so is not in the sequence.
20 = 2*2*5 has prime multiplicities (2,1) so is in the sequence
90 = 2*3*3*5 has prime multiplicities (1,2,1) so is not in the sequence.
MATHEMATICA
Select[Range[200], Greater@@FactorInteger[#][[All, 2]]&]
PROG
(PARI) isok(n) = my(vm = factor(n)[, 2]); vm == vecsort(vm, , 4) && (#vm == #Set(vm)); \\ Michel Marcus, May 17 2018
(PARI) list(lim)=my(v=List()); forfactored(n=1, lim\1, if(n[2][, 2]==vecsort(n[2][, 2], , 8), listput(v, n[1]))); Vec(v) \\ Charles R Greathouse IV, Oct 28 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, May 16 2018
STATUS
approved