A025196 a(n) = floor(Sum_{1<=i<j<=n} (sqrt(j)-sqrt(i))^2).

0, 0, 2, 4, 8, 14, 22, 32, 45, 61, 80, 103, 130, 162, 198, 239, 286, 338, 397, 462, 533, 612, 698, 791, 893, 1003, 1122, 1250, 1387, 1534, 1691, 1858, 2036, 2225, 2426, 2638, 2862, 3098, 3348, 3610, 3885, 4175, 4478, 4796, 5128, 5476, 5838, 6217, 6611, 7022, 7450, 7894

Offset

2,3

Links

Table of n, a(n) for n=2..53.

Mathematica

Table[Floor[Sum[(Sqrt[j]-Sqrt[i])^2, {i, n}, {j, i+1, n}]], {n, 2, 53}] (* Stefano Spezia, Mar 30 2023 *)

Crossrefs

Sequence in context: A194692 A155506 A014206 * A084626 A090533 A025003

Adjacent sequences: A025193 A025194 A025195 * A025197 A025198 A025199

Keyword

nonn

Author

Clark Kimberling

Status

approved