|
| |
|
|
A074791
|
|
Numbers n such that n does not divide the denominator of the n-th Harmonic number.
|
|
7
| |
|
|
6, 18, 20, 21, 33, 42, 54, 63, 66, 77, 100, 110, 120, 156, 162, 189, 198, 272, 294, 336, 342, 363, 377, 435, 486, 500, 506, 559, 567, 594, 600, 610, 629, 685, 703, 812, 847, 880, 924, 930, 957, 1067, 1166, 1210, 1243, 1247, 1287, 1320, 1332, 1458, 1590, 1640
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| n such that A064169(n) is different from A027612(n)
Also n such that A096617(n) is different from A001008(n). - Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 26 2006
|
|
|
FORMULA
| Is a(n) asymptotic to c*n^2 0.5<c<0.7 ?
|
|
|
MATHEMATICA
| Select[ Range[1700], Mod[ Denominator[ HarmonicNumber[ # ]], # ] != 0 &] (* Robert G. Wilson v *)
|
|
|
CROSSREFS
| Cf. A027612, A064169.
Cf. A096617, A001008.
Sequence in context: A174904 A074390 A045857 * A093106 A114452 A108762
Adjacent sequences: A074788 A074789 A074790 * A074792 A074793 A074794
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Sep 07 2002
|
|
|
EXTENSIONS
| Better description and more terms from Robert G. Wilson v (rgwv(at)rgwv.com), Sep 28 2005
|
| |
|
|
