|
| |
|
|
A077639
|
|
LCM of terms in period 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, 2988, 13200, 805600, 1323000, 1744790520, 112326337200, 10154793943770044128560, 26773964343922343708160, 185027354760601080, 1418008957437634586640
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| for A051451(10)=360360, the period is P={3,2,1,132,1,2,3,1200} with LCN[P]=13200 as LCM of entries, so a[10]=13200.
|
|
|
MATHEMATICA
| Table[Apply[LCM, Last[ContinuedFraction[Sqrt[Part[t, u]]]]], {u, 1, 24}]
|
|
|
CROSSREFS
| Cf. A000961, A051451, A077636-A077638.
Sequence in context: A053686 A080198 A077637 * A039791 A192536 A127679
Adjacent sequences: A077636 A077637 A077638 * A077640 A077641 A077642
|
|
|
KEYWORD
| cofr,nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Nov 13 2002
|
| |
|
|
