[go: up one dir, main page]

login
A056186
Sum of a(n) terms of 1/k^(9/10) first exceeds n.
0
1, 2, 4, 9, 19, 39, 77, 143, 259, 452, 767, 1267, 2043, 3223, 4986, 7573, 11311, 16634, 24114, 34497, 48744, 68083, 94072, 128672, 174333, 234091, 311692, 411723, 539773, 702614, 908407, 1166943, 1489914
OFFSET
0,2
MATHEMATICA
s = 0; k = 1; Do[ While[ s <= n, s = s + N[ 1/k^(9/10), 24 ]; k++ ]; Print[ k - 1 ], {n, 1, 32} ]
CROSSREFS
Cf. A019529 and A002387.
Sequence in context: A129784 A329356 A125050 * A265387 A293322 A267157
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 01 2000
STATUS
approved