A127722 Floor of square root of sum of squares of n consecutive odd numbers.

1, 3, 5, 9, 12, 16, 21, 26, 31, 36, 42, 47, 54, 60, 67, 73, 80, 88, 95, 103, 111, 119, 127, 135, 144, 153, 161, 171, 180, 189, 199, 208, 218, 228, 239, 249, 259, 270, 281, 292, 303, 314, 325, 336, 348, 360, 372, 383, 396, 408, 420, 432, 445, 458, 470, 483, 496

Offset: 1

Author

Artur Jasinski, Jan 25 2007

Keywords

• nonn

Crossrefs

Cf. A127719, A127720, A127721.

Programs

Maple

A000447 := proc(n) binomial(2*n+1,3) ; end: A000196 := proc(n) floor(sqrt(n)) ; end: A127722 := proc(n) A000196(A000447(n)) ; end: for n from 1 to 30 do printf("%d, ",A127722(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, 2}]; a

Formula

a(n) = A000196[A000447(n)]. - R. J. Mathar, Jan 28 2007