A373327 Records of A064784.

0, 2, 6, 9, 14, 20, 21, 28, 35, 44, 51, 57, 62, 75, 80, 84, 100, 104, 107, 126, 129, 131, 132, 155, 156, 182, 209, 237, 266, 291, 321, 344, 375, 396, 428, 461, 480, 514, 531, 566, 602, 617, 654, 667, 705, 744, 755, 795, 804, 845, 852, 894, 937, 942, 986, 989, 1034

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

R:= 0: m:= 0: count:= 1:
for i from 1 while count < 100 do
  t:= i*(i+1)/2;
  v:= t - floor(sqrt(t))^2;
  if v > m then
    R:= R, v; m:= v; count:= count+1;
  fi
od:
R; # Robert Israel, Dec 19 2024

Prog

(PARI) a373327(nmax) = {my(m=-oo); for(n=0, nmax, my(T=n*(n+1)/2, d=T-sqrtint(T)^2); if(d>m, print1(d, ", "); m=d))};
a373327(750)

Crossrefs

A373328 gives the corresponding positions.

Cf. A000217, A000290, A128549.

Sequence in context: A184824 A184836 A327895 * A096378 A342426 A217001

Adjacent sequences: A373324 A373325 A373326 * A373328 A373329 A373330

Keyword

nonn

Author

Hugo Pfoertner, Jun 01 2024

Status

approved