A056176 Sum of a(n) terms of 1/k^(1/4) first exceeds n.

1, 2, 3, 4, 6, 7, 9, 11, 12, 14, 16, 18, 20, 23, 25, 27, 29, 32, 34, 37, 39, 42, 44, 47, 49, 52, 55, 57, 60, 63, 66, 69, 72, 75, 77, 80, 83, 86, 90, 93, 96, 99, 102, 105, 108, 112, 115, 118, 122, 125, 128, 132, 135, 138, 142, 145, 149, 152, 156, 159, 163, 167, 170

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Cf. A019529.

Sequence in context: A192416 A026468 A263015 * A143831 A087072 A234852

Adjacent sequences: A056173 A056174 A056175 * A056177 A056178 A056179

Keyword

nonn

Author

Robert G. Wilson v, Aug 01 2000

Status

approved