The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A065082 Numbers k such that (period of the continued fraction for sqrt(k))^3 = k. 0
 8, 125, 216, 1728 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS Next term, if it exists, exceeds 6600000. - Sam Handler (sam_5_5_5_0(AT)yahoo.com), Nov 14 2004 LINKS Table of n, a(n) for n=1..4. MATHEMATICA Do[ If[ Length[ Last[ ContinuedFraction[ Sqrt[n]]]]^3 == n, Print[n]], {n, 1, 10^5} ] PROG (PARI) f(n) = {if (issquare(n), 0, my(p=100); while (! isokq(n, p), p+=100); localprec(p); my(cf = contfrac(sqrt(n))); for (k=2, #cf, if (cf[k] == 2*cf[1], return (k-1))); ); } \\ A003285 isok(m) = f(m)^3 == m; \\ Michel Marcus, Jul 12 2021 CROSSREFS Cf. A003285. Sequence in context: A024282 A340888 A231638 * A053058 A050803 A016791 Adjacent sequences: A065079 A065080 A065081 * A065083 A065084 A065085 KEYWORD nonn,more AUTHOR Naohiro Nomoto, Nov 09 2001 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 2 02:58 EDT 2023. Contains 365831 sequences. (Running on oeis4.)