|
|
A084237
|
|
a(n) = M(10^n), where M(n) is Mertens's function.
|
|
7
|
|
|
1, -1, 1, 2, -23, -48, 212, 1037, 1928, -222, -33722, -87856, 62366, 599582, -875575, -3216373, -3195437, -21830254, -46758740, 899990187, 461113106, -3395895277, -2061910120, 62467771689
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
Mertens's function: Sum_{k=1..n} mu(k), where mu = Möbius function (A008683).
|
|
MATHEMATICA
|
s = 0; i = 1; Do[ While[i <= 10^n, s = s + MoebiusMu[i]; i++ ]; Print[s], {n, 0, 50}]
|
|
PROG
|
(Perl) use ntheory ":all"; say mertens(10**$_) for 0..15; # Dana Jacobsen, May 22 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected a(17) and added a(18)-a(22) from Eugene Kuznetsov, a(17)-a(19) independently confirmed by Richard Sladkey, Aug 28 2012
a(21)'s sign correction and a(23) from Helfgott and Thompson (2021) added by Amiram Eldar, May 21 2021
|
|
STATUS
|
approved
|
|
|
|