A056177 Sum of a(n) terms of 1/k^(1/5) first exceeds n.

1, 2, 3, 4, 5, 7, 8, 10, 11, 13, 15, 16, 18, 20, 22, 24, 26, 28, 29, 31, 33, 36, 38, 40, 42, 44, 46, 48, 50, 53, 55, 57, 59, 62, 64, 66, 68, 71, 73, 75, 78, 80, 83, 85, 88, 90, 92, 95, 97, 100, 102, 105, 108, 110, 113, 115, 118, 120, 123, 126, 128, 131, 134, 136, 139

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Cf. A019529.

Sequence in context: A189729 A287549 A347655 * A025199 A213858 A277992

Adjacent sequences: A056174 A056175 A056176 * A056178 A056179 A056180

Keyword

nonn

Author

Robert G. Wilson v, Aug 01 2000

Status

approved