|
|
A175095
|
|
Integers of the form (2^j - 1)*(2^k + 1), j >= 0, k >= 0.
|
|
1
|
|
|
0, 2, 3, 5, 6, 9, 14, 15, 17, 21, 27, 30, 33, 35, 45, 51, 62, 63, 65, 75, 93, 99, 119, 126, 129, 135, 155, 189, 195, 231, 254, 255, 257, 279, 315, 381, 387, 455, 495, 510, 513, 527, 567, 635, 765, 771, 903, 975, 1022, 1023, 1025, 1071, 1143, 1275, 1533, 1539
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
mx = 1600; Join[{0}, Most@ Union@ Flatten@ Table[(2^j -1) (2^k +1), {j, Log2@ mx}, {k, 0, Log2[mx/(2^j -1)]} ]] (* Ivan Neretin, Feb 12 2018 and slightly modified by Robert G. Wilson v, Feb 13 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|