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 A206774 #16 Feb 16 2021 05:46:00 %S A206774 0,0,1,-1,1,0,1,-1,1,0,1,-1,1,0,1,-4,1,0,1,-1,1,0,1,-1,1,0,1,-1,1,0,1, %T A206774 -4,1,0,1,-1,1,0,1,-1,1,0,1,-1,1,0,1,-4,1,0,1,-1,1,0,1,-1,1,0,1,-1,1, %U A206774 0,1,-6,1,0,1,-1,1,0,1,-1,1,0,1,-1,1,0,1,-4,1,0,1,-1,1,0,1,-1,1,0,1,-1,1,0,1,-4,1,0,1,-1,1,0,1,-1,1 %N A206774 First differences of A033922. %H A206774 Antti Karttunen, <a href="/A206774/b206774.txt">Table of n, a(n) for n = 1..16383</a> %F A206774 a(n) = A033922(n) - A033922(n-1). %F A206774 For n >= 1, a(2n+1)=1, a(4n+2)=0, a(4*A042968(n))=-1, a(16*A042968(n))=-4, a(64*(2n+1))=-6. The values < 0 taken by the sequence are -1,-4,-6,-7, ... see A206775. %o A206774 (PARI) %o A206774 up_to = 16383; %o A206774 A033922list(n) = { my(v, k, e); v=vector(n+1); v[1]=1; for(m=1, n, k=m; e=0; while(k>0, if(k%2, v[m+1]+=v[e+1]); e++; k\=2)); (v); }; \\ From A033922 %o A206774 v033922 = A033922list(16383); %o A206774 A033922(n) = v033922[1+n]; %o A206774 A206774(n) = (A033922(n)-A033922(n-1)); \\ _Antti Karttunen_, Nov 06 2018 %Y A206774 Cf. A033922. %K A206774 sign,base %O A206774 1,16 %A A206774 _Benoit Cloitre_, Jan 10 2013 %E A206774 More terms from _Antti Karttunen_, Nov 06 2018