|
%I #3 Jun 19 2013 02:27:41
%S 2,6,9,13,26,33,65,69,89,126,133,189,513,517,537,626,633,637,689,1137,
%T 3126,3133,3189,3637,4097,4101,4121,4221,4721,7221,15626,15633,15689,
%U 16137,19721,32769,32773,32793,32893,33393,35893,48393,78126,78133,78189,78637
%N Numbers of the form 5^j + 8^k, for j and k >= 0.
%H T. D. Noe, <a href="/A226823/b226823.txt">Table of n, a(n) for n = 1..10000</a>
%t a = 5; b = 8; mx = 80000; 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
|
