login
A113958
Triangular numbers that can be written as sum of two positive cubes.
4
28, 91, 351, 2926, 8001, 46971, 58653, 93528, 97461, 141778, 300700, 365085, 382375, 398278, 874503, 1295245, 1669878, 3425653, 4117015, 7517503, 7657741, 7771653, 9415630, 9598771
OFFSET
1,1
COMMENTS
Intersection of A003325 and A000217.
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