A226831 Numbers of the form 7^j + 9^k, for j and k >= 0.
2, 8, 10, 16, 50, 58, 82, 88, 130, 344, 352, 424, 730, 736, 778, 1072, 2402, 2410, 2482, 3130, 6562, 6568, 6610, 6904, 8962, 16808, 16816, 16888, 17536, 23368, 59050, 59056, 59098, 59392, 61450, 75856, 117650, 117658, 117730, 118378, 124210, 176698, 531442
Offset: 1
Links
- T. D. Noe, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
a = 7; b = 9; mx = 600000; Union[Flatten[Table[a^n + b^m, {m, 0, Log[b, mx]}, {n, 0, Log[a, mx - b^m]}]]] -
PARI
list(lim)=my(v=List(),J,K); for(j=0,logint((lim\=1)-1,7), J=7^j; K=1; while(J+K<=lim, listput(v,J+K); K*=9)); Set(v) \\ Charles R Greathouse IV, Feb 18 2021