A234363 a(n) = floor(agm(n, triangular(n))), where agm denotes the arithmetic-geometric mean.

0, 1, 2, 4, 6, 9, 12, 15, 19, 23, 27, 32, 37, 42, 48, 54, 60, 66, 73, 80, 88, 95, 103, 111, 120, 129, 138, 147, 156, 166, 176, 187, 197, 208, 219, 231, 242, 254, 267, 279, 292, 305, 318, 331, 345, 359, 373, 388, 402, 417, 432, 448, 464, 479, 496, 512, 529, 546

Offset

0,3

Links

Table of n, a(n) for n=0..57.

Formula

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

Mathematica

Table[Floor[ArithmeticGeometricMean[n, (n(n+1))/2]], {n, 0, 60}] (* Harvey P. Dale, Aug 17 2014 *)

Crossrefs

Cf. A000217, A061979, A076145, A234362.

Sequence in context: A003066 A075349 A156024 * A194229 A194201 A194203

Adjacent sequences: A234360 A234361 A234362 * A234364 A234365 A234366

Keyword

nonn

Author

Alex Ratushnyak, Dec 24 2013

Status

approved