A056183 Sum of a(n) terms of 1/k^(6/7) first exceeds n.

1, 2, 4, 8, 16, 31, 56, 96, 158, 253, 393, 594, 878, 1271, 1806, 2523, 3472, 4711, 6312, 8359, 10949, 14199, 18243, 23237, 29360, 36816, 45841, 56698, 69689, 85152, 103467, 125060, 150406, 180034, 214529, 254542, 300788, 354056, 415215, 485213

Offset

0,2

Links

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

Example

For example, a(4) = 16 since Sum_{k=1..16} 1/k^(6/7) = 4.014698427... > 4, whereas Sum_{k=1..15} 1/k^(6/7) = 3.921823784... < 4.

Mathematica

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

Crossrefs

Cf. A019529 and A002387.

Sequence in context: A051039 A325730 A325749 * A000127 A133552 A174439

Adjacent sequences: A056180 A056181 A056182 * A056184 A056185 A056186

Keyword

nonn

Author

Robert G. Wilson v, Aug 01 2000

Status

approved