A073214 - OEIS

%I #30 Sep 05 2021 22:06:17

%S 2,20,38,362,380,722,6860,6878,7220,13718,130322,130340,130682,137180,

%T 260642,2476100,2476118,2476460,2482958,2606420,4952198,47045882,

%U 47045900,47046242,47052740,47176202,49521980,94091762,893871740,893871758,893872100

%N Sum of two powers of 19.

%H T. D. Noe, <a href="/A073214/b073214.txt">Rows n = 0..100 of triangle, flattened</a>

%F T(n,m) = 19^n + 19^m for n >= 0 and m in [0..n].

%F Bivariate g.f.: (2 - 20*x) / ((1 - x) * (1 - 19*x) * (1 - 19*x*y)). - _J. Douglas Morrison_, Jul 28 2021

%e T(2,0) = 19^2 + 19^0 = 362.

%e Table begins:

%e        2;

%e       20,     38;

%e      362,    380,    722;

%e     6860,   6878,   7220,  13718;

%e   130322, 130340, 130682, 137180, 260642;

%e   ...

%t Flatten[Table[Table[19^n + 19^m, {m, 0, n}], {n, 0, 7}]] (* _T. D. Noe_, Jun 18 2013 *)

%t Total/@Tuples[19^Range[0,10],2]//Union (* _Harvey P. Dale_, Jan 04 2019 *)

%Y Cf. A001029.

%Y Equals twice A073222.

%Y 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).

%K easy,nonn,tabl

%O 0,1

%A _Jeremy Gardiner_, Jul 20 2002