This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A359814 #10 Jan 16 2023 16:11:59 %S A359814 1,1,0,1,0,0,0,2,-1,0,0,1,0,0,-1,3,0,-1,0,1,-1,0,0,2,-1,0,0,1,0,-1,0, %T A359814 5,-1,0,-1,-1,0,0,-1,2,0,-1,0,1,0,0,0,4,-1,-1,-1,1,0,0,-1,2,-1,0,0,-1, %U A359814 0,0,0,8,-1,-1,0,1,-1,-1,0,-2,0,0,0,1,-1,-1,0,4,0,0,0,-1,-1,0,-1,2,0,0,-1,1,-1,0,-1,8 %N A359814 Dirichlet inverse of A359769, where A359769(n) = A353557(n) - A353556(n). %H A359814 Antti Karttunen, <a href="/A359814/b359814.txt">Table of n, a(n) for n = 1..16384</a> %F A359814 a(1) = 1, and for n > 1, a(n) = -Sum_{d|n, d<n} A359769(n/d) * a(d). %o A359814 (PARI) %o A359814 A353556(n) = ((!(n%2))&&(bigomega(n)%2)); %o A359814 A353557(n) = ((n%2)&&(!(bigomega(n)%2))); %o A359814 A359769(n) = (A353557(n)-A353556(n)); %o A359814 memoA359814 = Map(); %o A359814 A359814(n) = if(1==n,1,my(v); if(mapisdefined(memoA359814,n,&v), v, v = -sumdiv(n,d,if(d<n,A359769(n/d)*A359814(d),0)); mapput(memoA359814,n,v); (v))); %Y A359814 Cf. A001222, A353556, A353557, A359769, A359816 (parity of terms). %Y A359814 Cf. also A358777 (Dirichlet inverse of A353557), A359763 [= a(A003961(n))], A359815. %K A359814 sign %O A359814 1,8 %A A359814 _Antti Karttunen_, Jan 15 2023