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 A318656 #16 Sep 02 2018 17:07:18 %S A318656 0,1,-1,1,-1,0,-1,2,-3,0,-1,0,-1,0,-2,1,-1,-2,-1,0,-2,0,-1,1,-3,0,-4, %T A318656 0,-1,-1,-1,2,-2,0,-2,-2,-1,0,-2,1,-1,-1,-1,0,-4,0,-1,0,-3,-2,-2,0,-1, %U A318656 -3,-2,1,-2,0,-1,-1,-1,0,-4,2,-2,-1,-1,0,-2,-1,-1,-1,-1,0,-4,0,-2,-1,-1,0,-7,0,-1,-1,-2,0,-2,1,-1,-3,-2,0 %N A318656 The 2-adic valuation of ratio A318649(n)/A318512(n); a(n) = 2*A007814(n) - A046645(n). %C A318656 Also the 2-adic valuation of ratio A318681(n)/A299150(n) [which is equal to A318649(n)/A318512(n), but not represented in lowest terms], as well as the 2-adic valuation of A318680(n)/A299150(n) = A318511(n)/A318512(n). %H A318656 Antti Karttunen, <a href="/A318656/b318656.txt">Table of n, a(n) for n = 1..65537</a> %F A318656 a(n) = A318655(n) - A318513(n). %F A318656 a(n) = A007814(n) - A318440(n). %F A318656 a(n) = 2*A007814(n) - A046645(n) = A007814(n^2) - A046645(n). %o A318656 (PARI) %o A318656 A007814(n) = valuation(n,2); %o A318656 A005187(n) = { my(s=n); while(n>>=1, s+=n); s; }; %o A318656 A046644(n) = factorback(apply(e -> 2^A005187(e),factor(n)[,2])); %o A318656 A318656(n) = ((2*A007814(n))-A007814(A046644(n))); %Y A318656 Cf. A007814, A046645, A299150, A318440, A318511, A318512, A318513, A318649, A318655, A318680, A318681. %Y A318656 Cf. A318654 (positions of positive terms). %K A318656 sign %O A318656 1,8 %A A318656 _Antti Karttunen_, Sep 02 2018