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 A334091 #6 Apr 18 2020 19:44:48 %S A334091 0,0,1,-1,1,0,1,-2,2,-1,1,-1,1,0,0,-2,1,1,1,-2,2,-1,1,-2,1,0,1,-1,1, %T A334091 -1,1,-3,3,-2,2,-1,1,0,0,-2,1,1,1,-2,1,0,1,-3,3,-2,0,0,1,0,0,-1,2,-1, %U A334091 1,-2,1,0,1,-4,3,0,1,-3,3,-1,1,-2,1,0,0,0,1,-1,1,-3,3,-2,1,0,-1,2,0,-2,1,0,1,-1,1,0,0,-3,1,2,0,-2,1,-1,1,-1,2 %N A334091 a(1) = 0, then after the first differences of A329697. %H A334091 Antti Karttunen, <a href="/A334091/b334091.txt">Table of n, a(n) for n = 1..65537</a> %F A334091 a(1) = 0, and for n > 1, a(n) = A329697(n) - A329697(n-1). %F A334091 a(n) = A334090(n) - A334195(n). %o A334091 (PARI) %o A334091 A329697(n) = if(!bitand(n,n-1),0,1+A329697(n-(n/vecmax(factor(n)[, 1])))); %o A334091 A334091(n) = if(1==n,0,A329697(n)-A329697(n-1)); %Y A334091 Cf. A329697, A334090, A334195. %K A334091 sign %O A334091 1,8 %A A334091 _Antti Karttunen_, Apr 17 2020