A056185 Sum of a(n) terms of 1/k^(8/9) first exceeds n.

1, 2, 4, 9, 18, 37, 70, 128, 225, 383, 633, 1019, 1601, 2461, 3711, 5494, 8003, 11484, 16249, 22698, 31328, 42762, 57764, 77274, 102436, 134634, 175532, 227123, 291776, 372300, 472004

Offset

0,2

Links

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

Mathematica

s = 0; k = 1; Do[ While[ s <= n, s = s + N[ 1/k^(8/9), 24 ]; k++ ]; Print[ k - 1 ], {n, 1, 30} ]

Crossrefs

Cf. A019529 and A002387.

Sequence in context: A282825 A282956 A282986 * A363262 A152537 A182028

Adjacent sequences: A056182 A056183 A056184 * A056186 A056187 A056188

Keyword

nonn

Author

Robert G. Wilson v, Aug 01 2000

Status

approved