%I #8 Nov 25 2021 20:32:25

%S 1,-2,-4,-2,-3,7,-12,8,6,7,-15,18,-14,41,3,-12,-16,-4,-22,9,63,33,-30,

%T -49,-26,28,-10,15,-39,-2,-32,6,103,13,30,-69,-19,31,67,-68,-44,-218,

%U -23,39,36,70,-52,38,88,67,65,52,-55,-21,20,-294,147,69,-66,-52,-31,35,-144,48,16,-240,-37,93,165,-180,-76,78

%N Dirichlet inverse of EKG-permutation, A064413.

%H Antti Karttunen, <a href="/A349400/b349400.txt">Table of n, a(n) for n = 1..20000</a>

%H <a href="/index/Ed#EKG">Index entries for sequences related to EKG sequence</a>

%F a(1) = 1; a(n) = -Sum_{d|n, d < n} A064413(n/d) * a(d).

%o (PARI)

%o v064413 = readvec("b064413_to.txt"); \\ Data prepared with _Chai Wah Wu_'s Dec 08 2014 Python-program given in A064413.

%o A064413(n) = v064413[n];

%o memoA349400 = Map();

%o A349400(n) = if(1==n,1,my(v); if(mapisdefined(memoA349400,n,&v), v, v = -sumdiv(n,d,if(d<n,A064413(n/d)*A349400(d),0)); mapput(memoA349400,n,v); (v)));

%Y Cf. A064413, A323411, A349614.

%K sign

%O 1,2

%A _Antti Karttunen_, Nov 19 2021