A038492 Sums of 2 distinct powers of 12.
13, 145, 156, 1729, 1740, 1872, 20737, 20748, 20880, 22464, 248833, 248844, 248976, 250560, 269568, 2985985, 2985996, 2986128, 2987712, 3006720, 3234816, 35831809, 35831820, 35831952, 35833536, 35852544, 36080640, 38817792, 429981697, 429981708, 429981840, 429983424, 430002432, 430230528
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Take[Union[Plus@@@Subsets[12^Range[0,20],{2}]],50] (* Harvey P. Dale, Dec 16 2010 *)
-
Python
from math import isqrt def A038492(n): return 12**(m:=isqrt(n<<3)+1>>1)+12**(n-1-(m*(m-1)>>1)) # Chai Wah Wu, Apr 04 2025
Extensions
More terms from Vincenzo Librandi, Aug 06 2009
Offset corrected by Amiram Eldar, Jul 14 2022