|
Search: id:A064486
|
|
|
| A064486 |
|
Quotient cycle lengths of square roots of primorials. |
|
+0 1
|
|
| 1, 2, 2, 2, 2, 4, 2, 36, 38, 244, 244, 1830, 3422, 10626, 3828, 20970, 580384, 4197850
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
n=6: cfrac(sqrt(30030),'periodic','quotients')=[[173], [3, 2, 3, 346]], so a(6)=4
|
|
MAPLE
|
with(numtheory): [seq(nops(cfrac(sqrt(product(ithprime(j), j=1..k)), 'periodic', 'quotients')[2]), k=1..14)];
|
|
MATHEMATICA
|
Table[Length[Part[ContinuedFraction[Sqrt[q[u]]], 2]], {u, 1, 18}]
|
|
CROSSREFS
|
A002110.
Sequence in context: A049047 A037088 A153436 this_sequence A153437 A023153 A023159
Adjacent sequences: A064483 A064484 A064485 this_sequence A064487 A064488 A064489
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Oct 04 2001
|
|
|
Search completed in 0.002 seconds
|