|
| |
|
|
A077637
|
|
Largest term in periodic part of continued fraction expansion of square root of A051451[n], i.e. Sqrt[LCM(1,..,x)] where x is a prime power from A000961.
|
|
0
| |
|
|
1, 2, 4, 6, 14, 40, 56, 100, 332, 1200, 1696, 7000, 30514, 146344, 327236, 566792, 3052270, 16994324, 24033604, 146190716, 936077324, 6138269514, 42081855636, 111338124722, 810553782854, 6225981742592, 48626471887292, 68768216033362
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| For A051451(10)=360360, the period is {3,2,1,132,1,2,3,1200} with 1200 as largest entry, so a[10]=1200.
|
|
|
MATHEMATICA
| t={A051451(n)} Table[Max[Last[ContinuedFraction[Sqrt[Part[t, u]]]]], {u, 1, 24}]
|
|
|
CROSSREFS
| Cf. A000961, A051451, A077636.
Sequence in context: A058059 A053686 A080198 * A077639 A039791 A192536
Adjacent sequences: A077634 A077635 A077636 * A077638 A077639 A077640
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Nov 13 2002
|
|
|
EXTENSIONS
| a(25)-a(28) from Ray Chandler (rayjchandler(AT)sbcglobal.net), Jan 16 2009
|
| |
|
|
