A190468 Numbers with prime factorization pq^4r^5.

12960, 18144, 19440, 27216, 28512, 33696, 42768, 44064, 49248, 50544, 59616, 60000, 66096, 73872, 75168, 80352, 89424, 95904, 106272, 111456, 112752, 120528, 121824, 137376, 140000, 143856, 150000, 152928, 158112, 159408, 167184, 173664

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, May 10 2011

Keywords

• nonn

Links

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

Crossrefs

Cf. A190466, A190467.

Programs

Mathematica

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

PARI

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