login
Numbers that are the sum of two powers of 12.
5

%I #44 Jul 20 2019 10:09:00

%S 2,13,24,145,156,288,1729,1740,1872,3456,20737,20748,20880,22464,

%T 41472,248833,248844,248976,250560,269568,497664,2985985,2985996,

%U 2986128,2987712,3006720,3234816,5971968,35831809,35831820,35831952,35833536,35852544,36080640

%N Numbers that are the sum of two powers of 12.

%C Parity of this sequence is A073424.

%H Zak Seidov, <a href="/A194887/b194887.txt">Table of n, a(n) for n = 1..1000</a>

%e 12^0 + 12^2 = 145

%t t = 12^Range[0, 9]; Select[Union[Flatten[Table[i + j, {i, t}, {j, t}]]], # <= t[[-1]] + 1 &] (* _T. D. Noe_, Oct 09 2011 *)

%t Total/@Tuples[12^Range[0,10],2]//Union (* _Harvey P. Dale_, Jul 20 2019 *)

%Y Cf. A001021, A033048, A052216, A073424.

%K nonn,tabl

%O 1,1

%A _Jeremy Gardiner_, Oct 09 2011

%E Typo in example corrected by _Zak Seidov_, Oct 23 2011