A127761 Integer part of Gauss's Arithmetic-Geometric Mean M(1,n^5).
1, 10, 55, 193, 520, 1180, 2375, 4368, 7496, 12177, 18913, 28301, 41040, 57936, 79912, 108011, 143406, 187403, 241453, 307153, 386256, 480675, 592494, 723966, 877529, 1055804, 1261606, 1497950, 1768053, 2075346, 2423475, 2816310, 3257951
Offset: 1
Keywords
Programs
-
Mathematica
Table[Floor[ArithmeticGeometricMean[1, n^5]], {n, 1, 100}]
Formula
a(n) ~ Pi*n^5/(10*log(n) + 4*log(2)). - Vaclav Kotesovec, May 09 2016