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 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