%I A029683
%S A029683 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,
%T A029683 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,
%U A029683 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
%N A029683 a(n) = n-th digit after decimal point of cube root of n.
%t A029683 Array[ Function[ n, RealDigits[ N[ Power[ n, 1/3 ], n+6 ] ]// (#[ [ 1, 
               #[ [ 2 ] ]+n ] ])& ], 110 ]
%Y A029683 Sequence in context: A112597 A006666 A163334 this_sequence A063567 A072223 
               A124907
%Y A029683 Adjacent sequences: A029680 A029681 A029682 this_sequence A029684 A029685 
               A029686
%K A029683 nonn,base
%O A029683 1,2
%A A029683 N. J. A. Sloane (njas(AT)research.att.com), Olivier Gerard (olivier.gerard(AT)gmail.com)