A029683 a(n) = n-th digit after decimal point of cube root of n.

0, 5, 2, 4, 7, 0, 1, 0, 3, 0, 6, 6, 7, 2, 0, 3, 5, 7, 3, 1, 5, 6, 3, 6, 3, 8, 0, 5, 0, 2, 7, 1, 0, 7, 4, 6, 4, 0, 2, 1, 9, 8, 7, 6, 4, 0, 6, 2, 3, 8, 6, 8, 2, 0, 4, 2, 6, 0, 0, 8, 9, 4, 8, 0, 1, 1, 1, 5, 0, 6, 5, 2, 8, 0, 5, 8, 1, 5, 9, 0, 9, 1, 7, 8, 7, 6, 4, 1, 7, 3, 4, 3, 5, 0, 9, 8, 8, 7, 2, 8, 8, 8

Offset

1,2

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Mathematica

Array[ Function[ n, RealDigits[ N[ Power[ n, 1/3 ], n+6 ] ]// (#[ [ 1, #[ [ 2 ] ]+n ] ])& ], 110 ]
Table[NumberDigit[Surd[n, 3], -n], {n, 110}] (* Harvey P. Dale, May 10 2022 *)

Crossrefs

Sequence in context: A006666 A267830 A163334 * A063567 A072223 A246312

Adjacent sequences: A029680 A029681 A029682 * A029684 A029685 A029686

Keyword

nonn,base

Author

N. J. A. Sloane, Olivier Gérard

Status

approved