|
%I #3 Jun 19 2013 02:26:17
%S 2,3,5,8,9,11,15,17,23,33,39,50,51,53,57,65,71,81,113,129,135,177,257,
%T 263,305,344,345,347,351,359,375,407,471,513,519,561,599,855,1025,
%U 1031,1073,1367,2049,2055,2097,2391,2402,2403,2405,2409,2417,2433,2465
%N Numbers of the form 2^j + 7^k, for j and k >= 0.
%H T. D. Noe, <a href="/A226815/b226815.txt">Table of n, a(n) for n = 1..10000</a>
%t 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]}]]]
%Y Cf. A004050 (2^j + 3^k), A226806-A226832 (cases to 8^j + 9^k).
%K nonn
%O 1,1
%A _T. D. Noe_, Jun 19 2013
|
