|
| |
|
|
A234363
|
|
a(n) = floor(agm(n, triangular(n))), where agm denotes the arithmetic-geometric mean.
|
|
2
|
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
|
|
|
FORMULA
|
|
|
|
MATHEMATICA
|
Table[Floor[ArithmeticGeometricMean[n, (n(n+1))/2]], {n, 0, 60}] (* Harvey P. Dale, Aug 17 2014 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
