|
| |
|
|
A127613
|
|
a(n) = denominator of the continued fraction which has the positive divisors of n as its terms. The terms are written in order from n for the integer part, to 1 for the final term of the continued fraction.
|
|
2
| |
|
|
1, 1, 1, 3, 1, 10, 1, 13, 4, 16, 1, 268, 1, 22, 21, 107, 1, 577, 1, 693, 29, 34, 1, 26512, 6, 40, 37, 1329, 1, 50323, 1, 1725, 45, 52, 43, 537559, 1, 58, 53, 113317, 1, 134368, 1, 3225, 2916, 70, 1, 10259608, 8, 4091, 69, 4485, 1, 282700, 67, 303277, 77, 88, 1
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
EXAMPLE
| The divisors of 6 are 1,2,3,6. So a(6) is the denominator of 6 +1/(3 +1/(2+1/1)) = 63/10.
|
|
|
MATHEMATICA
| f[n_] := Denominator[FromContinuedFraction[Reverse[Divisors[n]]]]; Table[f[n], {n, 60}] (*Chandler*)
|
|
|
CROSSREFS
| Cf. A127611, A127612.
Sequence in context: A090479 A141903 A010289 * A178866 A019427 A008299
Adjacent sequences: A127610 A127611 A127612 * A127614 A127615 A127616
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Leroy Quet Jan 19 2007
|
|
|
EXTENSIONS
| Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Jan 22 2007
|
| |
|
|
