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 A349375 #11 Nov 21 2021 10:17:35 %S A349375 1,0,1,1,2,0,3,0,4,0,5,1,6,0,4,1,8,0,9,2,6,0,11,0,11,0,10,3,14,0,15,0, %T A349375 10,0,12,4,18,0,12,0,20,0,21,5,14,0,23,1,22,0,16,6,26,0,20,0,18,0,29, %U A349375 4,30,0,21,1,24,0,33,8,22,0,35,0,36,0,21,9,30,0,39,2,31,0,41,6,32,0,28,0,44,0,36,11,30,0,36 %N A349375 Dirichlet convolution of Kimberling's paraphrases (A003602) with Liouville's lambda. %H A349375 Antti Karttunen, <a href="/A349375/b349375.txt">Table of n, a(n) for n = 1..20000</a> %F A349375 a(n) = Sum_{d|n} A003602(n/d) * A008836(d). %t A349375 k[n_] := (n / 2^IntegerExponent[n, 2] + 1)/2; a[n_] := DivisorSum[n, k[#] * LiouvilleLambda[n/#] &]; Array[a, 100] (* _Amiram Eldar_, Nov 16 2021 *) %o A349375 (PARI) %o A349375 A003602(n) = (1+(n>>valuation(n,2)))/2; %o A349375 A008836(n) = ((-1)^bigomega(n)); %o A349375 A349375(n) = sumdiv(n,d,A003602(n/d)*A008836(d)); %Y A349375 Cf. A003602, A008836. %Y A349375 Cf. A347954, A347955, A347956, A349136, A349370, A349371, A349372, A349373, A349374, A349390, A349431, A349444, A349447 for Dirichlet convolutions of other sequences with A003602. %Y A349375 Cf. also A349395. %K A349375 nonn %O A349375 1,5 %A A349375 _Antti Karttunen_, Nov 15 2021