OFFSET
1,1
COMMENTS
LINKS
Donovan Johnson, Table of n, a(n) for n = 1..1000
W. Duke and R. Schulze-Pilot, Representation of integers by positive ternary quadratic forms and equidistribution of lattice points on ellipsoids, Invent. Math. 99(1990), 49-57.
Eric Weisstein's World of Mathematics, Hexagonal Number.
FORMULA
EXAMPLE
hex(19) = 703 = 378 + 325 = hex(14) + hex(13).
hex(21) = 861 = 630 + 231 = hex(18) + hex(11).
hex(25) = 1225 = 1035 + 190 = hex(23) + hex(10).
hex(38) = 2850 = 2415 + 435 = hex(35) + hex(15).
hex(39) = 3003 = 2850 + 153 = hex(38) + hex(9) = 2415 + 435 + 153 = hex(35) + hex(15) + hex(9).
hex(48) = 4560 = 2415 + 2145 = hex(35) + hex(33).
MATHEMATICA
With[{upto=60000}, Select[Union[Total/@Subsets[Table[n(2n-1), {n, Ceiling[ (1+Sqrt[1+8upto])/4]}], {2}]], IntegerQ[(1+Sqrt[1+8#])/4]&&#<=upto&]] (* Harvey P. Dale, Jul 24 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Jonathan Vos Post, Dec 18 2007
EXTENSIONS
Added missing term 276 and a(8)-a(35) from Donovan Johnson, Sep 27 2008
STATUS
approved