[go: up one dir, main page]

login
A056184
Sum of a(n) terms of 1/k^(7/8) first exceeds n.
0
1, 2, 4, 8, 17, 34, 63, 112, 192, 317, 508, 794, 1212, 1810, 2653, 3821, 5417, 7567, 10431, 14201, 19113, 25453, 33561, 43845, 56787, 72957, 93020, 117754, 148061, 184987, 229732, 283675, 348391, 425675, 517564, 626361, 754667, 905407
OFFSET
0,2
MATHEMATICA
s = 0; k = 1; Do[ While[ s <= n, s = s + N[ 1/k^(7/8), 24 ]; k++ ]; Print[ k - 1 ], {n, 1, 39} ]
CROSSREFS
Cf. A019529 and A002387.
Sequence in context: A289322 A349842 A049962 * A098718 A018299 A083593
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 01 2000
STATUS
approved