A190011 Numbers with prime factorization pq^3r^5.

4320, 6048, 9504, 9720, 11232, 12000, 13608, 14688, 16416, 19872, 21384, 25056, 25272, 26784, 28000, 31968, 32928, 33048, 35424, 36936, 37152, 40608, 44000, 44712, 45792, 50976, 52000, 52704, 54880, 56376, 57888, 60264, 60750, 61344

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, May 04 2011

Keywords

• nonn

Links

• T. D. Noe, Table of n, a(n) for n = 1..1000
• Will Nicholes, Prime Signatures

Crossrefs

Cf. A179665, A179703.

Programs

Mathematica

f[n_]:=Sort[Last/@FactorInteger[n]]=={1,3,5};Select[Range[180000],f]

PARI

list(lim)=my(v=List(),t1,t2);forprime(p=2, (lim\24)^(1/5), t1=p^5;forprime(q=2, (lim\t1)^(1/3), if(p==q, next);t2=t1*q^3;forprime(r=2, lim\t2, if(p==r||q==r, next);listput(v,t2*r)))); vecsort(Vec(v)) \\ Charles R Greathouse IV, Jul 24 2011