The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A334743 a(1) = 1; a(n) = -Sum_{d|n, d < n} omega(n/d) * a(d), where omega = A001221. 1
 1, -1, -1, 0, -1, 0, -1, 0, 0, 0, -1, 1, -1, 0, 0, 0, -1, 1, -1, 1, 0, 0, -1, 0, 0, 0, 0, 1, -1, 3, -1, 0, 0, 0, 0, 0, -1, 0, 0, 0, -1, 3, -1, 1, 1, 0, -1, 0, 0, 1, 0, 1, -1, 0, 0, 0, 0, 0, -1, -1, -1, 0, 1, 0, 0, 3, -1, 1, 0, 3, -1, -1, -1, 0, 1, 1, 0, 3, -1, 0, 0, 0, -1, -1, 0, 0, 0, 0, -1, -1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,30 LINKS Eric Weisstein's World of Mathematics, Distinct Prime Factors FORMULA G.f. A(x) satisfies: A(x) = x - Sum_{k>=2} omega(k) * A(x^k). Dirichlet g.f.: 1 / (1 + zeta(s) * primezeta(s)). MATHEMATICA a[n_] := If[n == 1, n, -Sum[If[d < n, PrimeNu[n/d] a[d], 0], {d, Divisors[n]}]]; Table[a[n], {n, 90}] CROSSREFS Cf. A001221, A007427, A008480, A008683, A010051, A327276, A334744. Sequence in context: A060282 A060283 A255851 * A078529 A180017 A243827 Adjacent sequences:  A334740 A334741 A334742 * A334744 A334745 A334746 KEYWORD sign AUTHOR Ilya Gutkovskiy, May 09 2020 STATUS approved

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

Last modified May 16 08:07 EDT 2021. Contains 343940 sequences. (Running on oeis4.)