|
|
A063473
|
|
a(n) = M(2*n-1), where M(n) is Mertens's function (A002321): Sum_{k=1..n} mu(k), where mu = Moebius function (A008683).
|
|
1
|
|
|
1, -1, -2, -2, -2, -2, -3, -1, -2, -3, -2, -2, -2, -1, -2, -4, -3, -1, -2, 0, -1, -3, -3, -3, -3, -2, -3, -2, -1, -1, -2, -1, 0, -2, -1, -3, -4, -3, -2, -4, -4, -4, -3, -1, -2, -1, 0, 2, 1, 1, 0, -2, -3, -3, -4, -4, -5, -5, -5, -3, -3, -1, -1, -2, -1, -3, -2, -1, -2, -4, -3, -1, 0, 1, 0, -1, -1, -1, -2, 0, 1, 0, -1, -1, -1, -2, -3, -4, -3
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
PROG
|
(PARI) M(n)=sum(k=1, n, moebius(k));
j=[]; for(n=1, 200, j=concat(j, M(2*n-1))); j
(PARI) { for (n=1, 1000, if (n>1, a+=moebius(2*n - 2) + moebius(2*n - 1), a=1); write("b063473.txt", n, " ", a) ) } \\ Harry J. Smith, Aug 22 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,sign,changed
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|