|
| |
|
|
A110268
|
|
Consider the sequence A110566: LCM{1,2,...,n}/denominator of harmonic number H(n). a(n) is the factor that is changed going from A110566(n) to A110566(n+1).
|
|
1
| |
|
|
1, 1, 1, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 5, 3, 1, 1, 3, 5, 1, 3, 1, 1, 1, 1, 1, 11, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 11, 1, 1, 1, 1, 7, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 1, 1, 11, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 25, 1, 1, 1, 1, 5
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,5
|
|
|
COMMENTS
| a(n) is always an odd prime power, A000961.
|
|
|
EXAMPLE
| A110566(4) through A110566(10) are {1,1,3,3,3,1,1}, therefore the factors are 1,3,1,1,3,1.
|
|
|
MATHEMATICA
| f[n_] := LCM @@ Range[n]/Denominator[HarmonicNumber[n]]; Table[ LCM[f[n], f[n + 1]]/GCD[f[n], f[n + 1]], {n, 104}]
|
|
|
CROSSREFS
| Cf. A110566, A112811.
Sequence in context: A103496 A124921 A076498 * A058965 A090623 A098094
Adjacent sequences: A110265 A110266 A110267 * A110269 A110270 A110271
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(at)rgwv.com), Sep 17 2005
|
| |
|
|
