login
Floor of square root of sum of squares of n consecutive odd numbers.
2

%I #6 Aug 18 2015 00:08:06

%S 1,3,5,9,12,16,21,26,31,36,42,47,54,60,67,73,80,88,95,103,111,119,127,

%T 135,144,153,161,171,180,189,199,208,218,228,239,249,259,270,281,292,

%U 303,314,325,336,348,360,372,383,396,408,420,432,445,458,470,483,496

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

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

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

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

%Y Cf. A127719, A127720, A127721.

%K nonn

%O 1,2

%A _Artur Jasinski_, Jan 25 2007