|
Search: id:A070888
|
|
|
| A070888 |
|
Numerator of Sum_{k=1..n} mu(k)/k. |
|
+0
5
|
|
| 1, 1, 1, 1, -1, 2, -1, -1, -1, 19, -1, -1, -2323, -89, 304, 304, 163, 163, -81988, -81988, -15019, 410857, -249979, -249979, -249979, 4165258, 4165258, 4165258, 9246047, -65721449, -4193929329, -4193929329, -6504197377, -302679716, 2562470143
(list; graph; listen)
|
|
|
OFFSET
|
1,6
|
|
|
EXAMPLE
|
a(6)=2 because 1-1/2-1/3-1/5+1/6 = 4/30=2/15.
|
|
MATHEMATICA
|
Table[ Numerator[ Sum[ MoebiusMu[k]/k, {k, 1, n}]], {n, 1, 37}]
|
|
PROGRAM
|
PARI: t = 0; v = []; for( n = 1, 60, t= t + mu( n) / n; v = concat( v, numer( t))); v
|
|
CROSSREFS
|
Cf. A070889.
Adjacent sequences: A070885 A070886 A070887 this_sequence A070889 A070890 A070891
Sequence in context: A079834 A029582 A067095 this_sequence A067101 A105816 A062979
|
|
KEYWORD
|
frac,sign,easy
|
|
AUTHOR
|
Donald S McDonald (don.mcdonald(AT)paradise.net.nz), May 17 2002
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 10 2002
|
|
|
Search completed in 0.002 seconds
|
