|
|
A226815
|
|
Numbers of the form 2^j + 7^k, for j and k >= 0.
|
|
1
|
|
|
2, 3, 5, 8, 9, 11, 15, 17, 23, 33, 39, 50, 51, 53, 57, 65, 71, 81, 113, 129, 135, 177, 257, 263, 305, 344, 345, 347, 351, 359, 375, 407, 471, 513, 519, 561, 599, 855, 1025, 1031, 1073, 1367, 2049, 2055, 2097, 2391, 2402, 2403, 2405, 2409, 2417, 2433, 2465
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a = 2; b = 7; mx = 3000; Union[Flatten[Table[a^n + b^m, {m, 0, Log[b, mx]}, {n, 0, Log[a, mx - b^m]}]]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|