|
|
A279537
|
|
Numbers of the form 2^i * 6^j * 30^k.
|
|
3
|
|
|
1, 2, 4, 6, 8, 12, 16, 24, 30, 32, 36, 48, 60, 64, 72, 96, 120, 128, 144, 180, 192, 216, 240, 256, 288, 360, 384, 432, 480, 512, 576, 720, 768, 864, 900, 960, 1024, 1080, 1152, 1296, 1440, 1536, 1728, 1800, 1920
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
mx = 6000; Take[ Sort[ Flatten[ Table[2^i*6^j*30^k, {i, 0, Log[2, mx]}, {j, 0, Log[6, mx]}, {k, 0, Log[30, mx]}]]], 60] (* Robert G. Wilson v, Dec 14 2016 *)
|
|
PROG
|
(PARI) list(lim)=my(v=List(), x, y); for(k=0, logint(lim\=1, 30), y=30^k; for(j=0, logint(lim\y, 6), x=y*6^j; while(x<=lim, listput(v, x); x<<=1))); Set(v)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|