A073219
The terms of A073211 (sums of two powers of 11) divided by 2.
Original entry on oeis.org
1, 6, 11, 61, 66, 121, 666, 671, 726, 1331, 7321, 7326, 7381, 7986, 14641, 80526, 80531, 80586, 81191, 87846, 161051, 885781, 885786, 885841, 886446, 893101, 966306, 1771561, 9743586, 9743591, 9743646, 9744251, 9750906, 9824111, 10629366, 19487171
Offset: 1
a(4) = 61 = (11^2+11^0) / 2.
A073213
Sum of two powers of 17.
Original entry on oeis.org
2, 18, 34, 290, 306, 578, 4914, 4930, 5202, 9826, 83522, 83538, 83810, 88434, 167042, 1419858, 1419874, 1420146, 1424770, 1503378, 2839714, 24137570, 24137586, 24137858, 24142482, 24221090, 25557426, 48275138, 410338674, 410338690, 410338962, 410343586, 410422194, 411758530, 434476242, 820677346
Offset: 0
T(2,0) = 17^2 + 17^0 = 290.
Table T(n,m) begins:
2;
18, 34;
290, 306, 578;
4914, 4930, 5202, 9826;
83522, 83538, 83810, 88434, 167042;
...
Sums of two powers of n:
A073423 (0),
A007395 (1),
A173786 (2),
A055235 (3),
A055236 (4),
A055237 (5),
A055257 (6),
A055258 (7),
A055259 (8),
A055260 (9),
A052216 (10),
A073211 (11),
A194887 (12),
A072390 (13),
A055261 (16),
A073214 (19),
A073215 (23).
-
Flatten[Table[Table[17^n + 17^m, {m, 0, n}], {n, 0, 7}]] (* T. D. Noe, Jun 18 2013 *)
Union[Total/@Tuples[17^Range[0,10],2]] (* Harvey P. Dale, Apr 09 2015 *)
-
from math import isqrt
def A073213(n): return 17**(a:=(k:=isqrt(m:=n<<1))+(m>k*(k+1))-1)+17**(n-1-(a*(a+1)>>1)) # Chai Wah Wu, Apr 09 2025
A073214
Sum of two powers of 19.
Original entry on oeis.org
2, 20, 38, 362, 380, 722, 6860, 6878, 7220, 13718, 130322, 130340, 130682, 137180, 260642, 2476100, 2476118, 2476460, 2482958, 2606420, 4952198, 47045882, 47045900, 47046242, 47052740, 47176202, 49521980, 94091762, 893871740, 893871758, 893872100, 893878598, 894002060, 896347838, 940917620, 1787743478
Offset: 0
T(2,0) = 19^2 + 19^0 = 362.
Table begins:
2;
20, 38;
362, 380, 722;
6860, 6878, 7220, 13718;
130322, 130340, 130682, 137180, 260642;
...
Sums of two powers of n:
A073423 (0),
A007395 (1),
A173786 (2),
A055235 (3),
A055236 (4),
A055237 (5),
A055257 (6),
A055258 (7),
A055259 (8),
A055260 (9),
A052216 (10),
A073211 (11),
A194887 (12),
A072390 (13),
A055261 (16),
A073213 (17),
A073215 (23).
-
Flatten[Table[Table[19^n + 19^m, {m, 0, n}], {n, 0, 7}]] (* T. D. Noe, Jun 18 2013 *)
Total/@Tuples[19^Range[0,10],2]//Union (* Harvey P. Dale, Jan 04 2019 *)
-
from math import isqrt
def A073214(n): return 19**(a:=(k:=isqrt(m:=n<<1))+(m>k*(k+1))-1)+19**(n-1-(a*(a+1)>>1)) # Chai Wah Wu, Apr 09 2025
A073215
Sum of two powers of 23.
Original entry on oeis.org
2, 24, 46, 530, 552, 1058, 12168, 12190, 12696, 24334, 279842, 279864, 280370, 292008, 559682, 6436344, 6436366, 6436872, 6448510, 6716184, 12872686, 148035890, 148035912, 148036418, 148048056, 148315730, 154472232, 296071778
Offset: 0
T(2,0) = 23^2 + 23^0 = 530.
Table begins:
2;
24, 46;
530, 552, 1058;
12168, 12190, 12696, 24334;
279842, 279864, 280370, 292008, 559682;
...
Sums of two powers of n:
A073423 (0),
A007395 (1),
A173786 (2),
A055235 (3),
A055236 (4),
A055237 (5),
A055257 (6),
A055258 (7),
A055259 (8),
A055260 (9),
A052216 (10),
A073211 (11),
A194887 (12),
A072390 (13),
A055261 (16),
A073213 (17),
A073214 (19).
-
With[{nn=30},Take[Union[Total/@Tuples[23^Range[0,nn],2]],nn]] (* Harvey P. Dale, Oct 16 2017 *)
-
from math import isqrt
def A073215(n): return 23**(a:=(k:=isqrt(m:=n<<1))+(m>k*(k+1))-1)+23**(n-1-(a*(a+1)>>1)) # Chai Wah Wu, Apr 09 2025
Showing 1-4 of 4 results.