OFFSET
1,2
COMMENTS
A variant of A180340.
LINKS
Ray Chandler, Table of n, a(n) for n = 1..61
C. A. Van Cott, The Integer Hokey Pokey, Math Horizons, Vol. 28, pp. 24-27, November 2020.
Eric Weisstein's World of Mathematics, Full Reptend Prime
Eric Weisstein's World of Mathematics, Cyclic Number
MATHEMATICA
f[n_]:=Block[{q}, q=Last[First[RealDigits[1/n]]]; If[IntegerQ[q], q={}]; FromDigits[q]]; q=0; lst={}; Do[If[StringLength[ToString[f[n]]]>q, AppendTo[lst, f[n]]; q=StringLength[ToString[f[n]]]], {n, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, May 21 2009 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Definition corrected by Max Alekseyev, Feb 12 2012
STATUS
approved