A342417 Dirichlet inverse of Čiurlionis sequence, A342002.
1, -1, -5, -1, -7, 9, -7, -5, -6, 1, -41, 5, -9, 3, 33, -1, -47, -6, -11, 19, 27, 63, -53, 41, 36, 1, 136, 7, -59, 7, -9, 25, 369, 77, 43, 16, -59, -49, -157, -9, -317, -19, -73, -13, -10, -21, -359, -53, -38, -52, 139, -105, -401, -348, 473, -23, -263, -51, -443, -201, -11, 5, 292, 23, 65, -893, -69, -5, 253, 31
Offset: 1
Keywords
Links
- Antti Karttunen, Table of n, a(n) for n = 1..11550
Crossrefs
Programs
-
PARI
up_to = 11550; DirInverseCorrect(v) = { my(u=vector(#v)); u[1] = (1/v[1]); for(n=2, #v, u[n] = (-u[1]*sumdiv(n, d, if(d
A342002(n) = { my(s=0, m=1, p=2, e); while(n, e = (n%p); m *= p^(e>0); s += (e/p); n = n\p; p = nextprime(1+p)); (s*m); }; v342417 = DirInverseCorrect(vector(up_to,n,A342002(n))); A342417(n) = v342417[n];