OFFSET
1,9
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Sourabhashis Das, Wentang Kuo, and Yu-Ru Liu, On the number of prime factors with a given multiplicity over h-free and h-full numbers, arXiv:2409.11275 [math.NT], 2024. See Theorem 1.3.
FORMULA
MATHEMATICA
f[k_] := Module[{e = If[k == 1, {}, FactorInteger[k][[;; , 2]]]}, If[AllTrue[e, # > 1 &], Count[e, 2], Nothing]]; Array[f, 3500]
PROG
(PARI) lista(kmax) = {my(e, is); for(k = 1, kmax, e = factor(k)[, 2]; is = 1; for(i = 1, #e, if(e[i] == 1, is = 0; break)); if(is, print1(#select(x -> x == 2, e), ", "))); }
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, Sep 21 2024
STATUS
approved