|
|
A055043
|
|
Numbers of the form 2^(2i+1)*(8*j+3).
|
|
0
|
|
|
6, 22, 24, 38, 54, 70, 86, 88, 96, 102, 118, 134, 150, 152, 166, 182, 198, 214, 216, 230, 246, 262, 278, 280, 294, 310, 326, 342, 344, 352, 358, 374, 384, 390, 406, 408, 422, 438, 454, 470, 472, 486, 502, 518, 534, 536, 550, 566, 582, 598
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
f[upto_]:=Module[{maxi=Floor[(Log[2, upto]-1)/2], maxj= Floor[(upto-3)/8], s}, s=2^(2First[#]+1) (8Last[#]+3)&/@ Tuples[{Range[0, maxi], Range[0, maxj]}]; Union[Select[s, #<=upto&]]]; f[700] (* Harvey P. Dale, Mar 23 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|