|
|
A190011
|
|
Numbers with prime factorization pq^3r^5.
|
|
3
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n = 1..1000
Will Nicholes, Prime Signatures
|
|
MATHEMATICA
|
f[n_]:=Sort[Last/@FactorInteger[n]]=={1, 3, 5}; Select[Range[180000], f]
|
|
PROG
|
(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
|
|
CROSSREFS
|
Cf. A179665, A179703.
Sequence in context: A236881 A190929 A055153 * A338537 A145312 A008409
Adjacent sequences: A190008 A190009 A190010 * A190012 A190013 A190014
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Joseph Stephan Orlovsky, May 04 2011
|
|
STATUS
|
approved
|
|
|
|