cp's OEIS Frontend

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.

A323411 Dirichlet inverse of A064664, the inverse permutation of EKG-sequence.

This page as a plain text file.
%I A323411 #8 Jan 14 2019 09:03:58
%S A323411 1,-2,-5,1,-10,16,-14,-4,19,31,-20,-21,-28,43,89,4,-33,-98,-37,-42,
%T A323411 125,61,-43,48,76,85,-87,-58,-57,-409,-61,-1,179,100,255,203,-67,112,
%U A323411 251,98,-74,-573,-81,-85,-559,130,-89,-100,146,-370,296,-107,-100,548,347,145,332,172,-107,846,-115,184,-783,3,506,-825,-128
%N A323411 Dirichlet inverse of A064664, the inverse permutation of EKG-sequence.
%H A323411 Antti Karttunen, <a href="/A323411/b323411.txt">Table of n, a(n) for n = 1..32768</a>
%H A323411 <a href="/index/Ed#EKG">Index entries for sequences related to EKG sequence</a>
%o A323411 (PARI)
%o A323411 up_to = 32768;
%o A323411 v064413 = readvec("b064413_upto65539_terms_only.txt"); \\ From precomputed file.
%o A323411 A064413(n) = v064413[n];
%o A323411 \\ Then its inverse A064664 is prepared:
%o A323411 m064664 = Map();
%o A323411 for(n=1,65539,mapput(m064664,A064413(n),n));
%o A323411 A064664(n) = mapget(m064664,n);
%o A323411 DirInverse(v) = { my(u=vector(#v)); u[1] = (1/v[1]); for(n=2, #v, u[n] = -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.
%o A323411 v323411 = DirInverse(vector(up_to,n,A064664(n)));
%o A323411 A323411(n) = v323411[n];
%Y A323411 Cf. A064413, A064664, A323412.
%Y A323411 Cf. also A304526, A304527, A317843, A318664, A318665.
%K A323411 sign
%O A323411 1,2
%A A323411 _Antti Karttunen_, Jan 13 2019