|
Search: id:A112811
|
|
| |
|
| 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; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
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: A126970 A001351 A143081 this_sequence A160708 A040173 A128777
Adjacent sequences: A112808 A112809 A112810 this_sequence A112812 A112813 A112814
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 20 2005
|
|
|
Search completed in 0.002 seconds
|
