A029684 n-th digit after decimal point of 4th root of n.

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

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

seq(floor(n^(1/4)*10^n) mod 10, n=1..200); # Robert Israel, Jun 14 2018

Mathematica

Array[ Function[ n, RealDigits[ N[ Power[ n, 1/4 ], n+6 ]]// (#[[ 1, #[[ 2 ]]+n ]])& ], 110 ]

Crossrefs

Sequence in context: A033952 A365254 A021847 * A200626 A360166 A197732

Adjacent sequences: A029681 A029682 A029683 * A029685 A029686 A029687

Keyword

nonn,base

Author

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

Status

approved