A127758 Integer part of Gauss's Arithmetic-Geometric Mean M(1,n^2).

1, 2, 3, 6, 8, 11, 14, 18, 22, 26, 30, 35, 40, 46, 51, 58, 64, 71, 77, 85, 92, 100, 108, 116, 125, 134, 143, 152, 162, 172, 182, 193, 204, 215, 226, 238, 249, 261, 274, 286, 299, 312, 326, 339, 353, 367, 381, 396, 411, 426, 441, 457, 473, 489, 505, 521, 538, 555

Offset: 1

Author

Artur Jasinski, Jan 28 2007

Keywords

• nonn

Crossrefs

Cf. A127757, A127759, A127760, A127761.

Programs

Mathematica

Table[Floor[ArithmeticGeometricMean[1, n^2]], {n, 1, 100}]

Formula

a(n) ~ Pi*n^2/(4*log(2*n)). - Vaclav Kotesovec, May 09 2016