A127721 Floor of square root of sum of squares of n consecutive numbers.

1, 2, 3, 5, 7, 9, 11, 14, 16, 19, 22, 25, 28, 31, 35, 38, 42, 45, 49, 53, 57, 61, 65, 70, 74, 78, 83, 87, 92, 97, 102, 106, 111, 116, 122, 127, 132, 137, 143, 148, 154, 159, 165, 171, 177, 183, 188, 194, 201, 207, 213, 219, 225, 232, 238, 245, 251, 258, 264, 271, 278

Offset

1,2

Links

Alois P. Heinz, Table of n, a(n) for n = 1..10000

Formula

a(n) = A000196(A000330(n)). - R. J. Mathar, Jan 28 2007

Maple

A000330 := proc(n) local i; add(i^2, i=0..n); end: A000196 := proc(n) floor(sqrt(n)); end: A127721 := proc(n) A000196(A000330(n)); end: for n from 1 to 30 do printf("%d, ", A127721(n)); od; # R. J. Mathar, Jan 28 2007

Mathematica

a = {}; k = 0; Do[k = k + x^2; AppendTo[a, Floor[Sqrt[k]]], {x, 1, 150}]; a

Crossrefs

Cf. A000196, A000330, A127719, A127720.

Sequence in context: A039786 A102422 A062427 * A292620 A241907 A065130

Adjacent sequences: A127718 A127719 A127720 * A127722 A127723 A127724

Keyword

nonn

Author

Artur Jasinski, Jan 25 2007

Status

approved