login
Floor of square root of sum of squares of n consecutive numbers.
5

%I #10 Feb 02 2017 21:19:12

%S 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,

%T 78,83,87,92,97,102,106,111,116,122,127,132,137,143,148,154,159,165,

%U 171,177,183,188,194,201,207,213,219,225,232,238,245,251,258,264,271,278

%N Floor of square root of sum of squares of n consecutive numbers.

%H Alois P. Heinz, <a href="/A127721/b127721.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A000196(A000330(n)). - _R. J. Mathar_, Jan 28 2007

%p 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

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

%Y Cf. A000196, A000330, A127719, A127720.

%K nonn

%O 1,2

%A _Artur Jasinski_, Jan 25 2007