|
%I #9 Jan 21 2014 16:27:54
%S 2,4,6,12,10,24,21,32,27,50,44,60,65,56,90,112,85,108,114,140,147,154,
%T 138,216,200,182,216,252,232,240,310,288,330,306,350,324,333,456,429,
%U 480,451,378,516,484,585,460,611,720,490,550,765,832,636,702,605,672
%N Sum of consecutive equal values of floor(sqrt(A000040(n))).
%H Reinhard Zumkeller, <a href="/A180304/b180304.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = n* A014085(n). [From _R. J. Mathar_, Aug 26 2010]
%o (Haskell)
%o a180304 n = fromIntegral (a014085 n) * n
%o a180304_list = map sum $ group a000006_list
%o -- _Reinhard Zumkeller_, Jan 21 2014
%Y Cf. A000006, A000040, A038040.
%K easy,nonn
%O 1,1
%A _Odimar Fabeny_, Aug 25 2010
%E Edited by _N. J. A. Sloane_, Aug 26 2010
%E More terms from _R. J. Mathar_, Aug 26 2010
|
