|
| |
|
|
A112811
|
|
Terms of A110566 grouped.
|
|
2
| |
|
|
1, 3, 1, 3, 15, 45, 15, 3, 1, 11, 77, 7, 1, 3, 9, 27, 9, 3, 33, 11, 1, 25, 5, 55, 275, 25, 1, 13, 39, 3, 9, 27, 9, 3, 1, 17, 1, 49, 7, 49, 931, 19, 1, 11, 319, 11, 319, 11, 1, 3, 75, 1725, 345, 15, 645, 1935, 5805, 29025, 675, 41175, 13725, 549, 20313, 6771, 183, 3, 411, 15207
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| A110566: LCM{1,2,...,n}/denominator of harmonic number H(n).
The factor of change from a(n) to a(n+1) is: 3,3,3,5,3,3,5,3,11,7,11,7,3,3,3,3,3,11,3,11,25,5,11,5,11,25,13,3,13,3,3,3,3,..., . see A110268.
|
|
|
MATHEMATICA
| f[n_] := LCM @@ Range[n]/Denominator[HarmonicNumber[n]]; Flatten[Union /@ Split[Table[f[n], {n, 703}]]]
|
|
|
CROSSREFS
| Cf. A110566, A112812, A110268.
Sequence in context: A173424 A143081 A179658 * A197272 A160708 A040173
Adjacent sequences: A112808 A112809 A112810 * A112812 A112813 A112814
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 20 2005
|
| |
|
|
