%I #4 Mar 31 2012 12:38:36
%S 1,1,3,1,1,3,294,1,81,1,242,3,1014,294,3,1,4624,81,6498,1,294,242,
%T 11638,3,1,1014,2187,294,23548,3,14415,1,726,4624,294,81,4107,6498,
%U 1014,1,8405,294,38829,242,81,11638,101614,3,100842,1,13872,1014,36517,2187
%N Period of decimal representation of 1/n^3.
%t DigitCycleLength[r_Rational,b_Integer?Positive]:=MultiplicativeOrder[b,FixedPoint[Quotient[ #,GCD[ #,b]]&,Denominator[r]]];Table[If[n<2,1,DigitCycleLength[1/n^3,10]],{n,5!}]
%Y Cf. A007732, A176920
%K nonn,base
%O 1,3
%A _Vladimir Joseph Stephan Orlovsky_, Apr 29 2010