%I #9 Jun 06 2016 22:23:03
%S 1,1,1,2,2,2,3,3,3,4,4,4,5,5,5,6,6,6,6,7,7,7,7,8,8,8,9,9,9,9,10,10,10,
%T 10,11,11,11,11,12,12,12,12,13,13,13,13,14,14,14,14,15,15,15,15,16,16,
%U 16,16,16,17,17,17,17,18,18,18,18,19,19,19,19,19,20,20,20,20,21,21,21
%N Integer part of Gauss' Arithmetic-Geometric Mean M(1,n).
%F a(n) ~ Pi*n/(2*log(n) + 4*log(2)). - _Vaclav Kotesovec_, May 09 2016
%t Table[Floor[ArithmeticGeometricMean[1, n]], {n, 1, 100}]
%Y Cf. A127758, A127759, A127760, A127761.
%K nonn
%O 1,4
%A _Artur Jasinski_, Jan 28 2007