A176921 Period of decimal representation of 1/n^3.

1, 1, 3, 1, 1, 3, 294, 1, 81, 1, 242, 3, 1014, 294, 3, 1, 4624, 81, 6498, 1, 294, 242, 11638, 3, 1, 1014, 2187, 294, 23548, 3, 14415, 1, 726, 4624, 294, 81, 4107, 6498, 1014, 1, 8405, 294, 38829, 242, 81, 11638, 101614, 3, 100842, 1, 13872, 1014, 36517, 2187

Offset

1,3

Links

Table of n, a(n) for n=1..54.

Mathematica

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!}]

Crossrefs

Cf. A007732, A176920

Sequence in context: A277198 A242735 A177058 * A000503 A254864 A111956

Adjacent sequences: A176918 A176919 A176920 * A176922 A176923 A176924

Keyword

nonn,base

Author

Vladimir Joseph Stephan Orlovsky, Apr 29 2010

Status

approved