login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A346477 Dirichlet inverse of A346476. 4
1, -1, -1, 2, -3, 5, -3, 2, 8, 13, -9, -2, -9, 17, 11, 8, -15, -8, -15, -12, 19, 37, -17, 18, 8, 41, -4, -12, -27, -33, -25, 20, 37, 61, 25, 56, -33, 65, 35, 38, -39, -45, -39, -42, -36, 77, -41, 32, 32, -20, 53, -42, -47, 96, 35, 58, 61, 109, -57, 132, -55, 109, -48, 56, 43, -121, -63, -72, 71, -109, -69, 56 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,4
LINKS
FORMULA
a(1) = 1; and for n > 2, a(n) = -Sum_{d|n, d<n} a(d) * A346476(n/d).
a((n) = A346478(n) - A346476(n).
a(p) = A252748(p) = A346248(p) = -A346476(p) = -A062234(A000720(p)), for any prime p.
PROG
(PARI)
up_to = 16384;
DirInverseCorrect(v) = { my(u=vector(#v)); u[1] = (1/v[1]); for(n=2, #v, u[n] = (-u[1]*sumdiv(n, d, if(d<n, v[n/d]*u[d], 0)))); (u) }; \\ Compute the Dirichlet inverse of the sequence given in input vector v.
A346476(n) = (n+n-A250469(n));
v346477 = DirInverseCorrect(vector(up_to, n, A346476(n)));
A346477(n) = v346477[n];
CROSSREFS
Cf. also A323910, A346248, A346479.
Sequence in context: A254862 A340641 A322235 * A337583 A172984 A072751
KEYWORD
sign
AUTHOR
Antti Karttunen, Jul 29 2021
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 10 13:32 EDT 2024. Contains 375056 sequences. (Running on oeis4.)