1,6
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Array[ Function[ n, RealDigits[ N[ Power[ n, 1/9 ], 10 ], 10 ]// (#[ [ 1, #[ [ 2 ] ]+1 ] ])& ], 110 ]
Table[Mod[Floor[10*Surd[n, 9]], 10], {n, 120}] (* Harvey P. Dale, Apr 02 2018 *)
Sequence in context: A130259 A068549 A132173 * A284248 A204166 A227581
Adjacent sequences: A023965 A023966 A023967 * A023969 A023970 A023971
nonn,base
N. J. A. Sloane, Olivier Gérard
approved