A127765 Integer part of Gauss's Arithmetic-Geometric Mean M(2,n^4).
1, 7, 25, 64, 137, 258, 444, 714, 1086, 1586, 2236, 3063, 4096, 5364, 6899, 8736, 10909, 13455, 16414, 19826, 23734, 28181, 33212, 38876, 45221, 52297, 60158, 68856, 78447, 88988, 100537, 113155, 126903, 141845, 158045, 175570, 194487
Offset: 1
Keywords
Programs
-
Mathematica
Table[Floor[ArithmeticGeometricMean[2, n^4]], {n, 1, 100}]
Formula
a(n) ~ Pi*n^4/(8*log(n) + 2*log(2)). - Vaclav Kotesovec, May 09 2016