OFFSET
1,1
LINKS
EXAMPLE
91 = 13*(13+1)/2 = 4^3 + 3^3, therefore 91 is a term.
MATHEMATICA
Sort[Select[Total/@Subsets[Range[300]^3, {2}], OddQ[Sqrt[8#+1]]&]] (* Harvey P. Dale, Oct 10 2014 *)
PROG
(PARI) T=thueinit('z^3+1);
has(n)=#select(v->min(v[1], v[2])>0, thue(T, n))>0
list(lim)=my(v=List()); for(n=7, (sqrtint(lim\1*8+1)-1)\2, my(t=n*(n+1)/2); if(has(t), listput(v, t))); Vec(v) \\ Charles R Greathouse IV, May 22 2026
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jun 03 2006
STATUS
approved
