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 A161673 #10 Jan 06 2018 10:57:54 %S A161673 0,1,2,3,4,5,6,7,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32, %T A161673 33,34,35,36,37,38,39,48,49,50,51,52,53,54,55,64,65,66,67,68,69,70,71, %U A161673 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103 %N A161673 Positions n such that A010060(n) + A010060(n+8) = 1. %C A161673 Also union of numbers of the form 8*A121539(n)+k, 0<=k<8. %C A161673 Generalization: the numbers n such that A010060(n)+A010060(n+2^m)=1 constitute the union of sequences {2^m*A121539(n)+k}, k=0,1,...,2^m-1. %H A161673 G. C. Greubel, <a href="/A161673/b161673.txt">Table of n, a(n) for n = 1..10000</a> %F A161673 A001477 \ A161639. %t A161673 tm[0] = 0; tm[n_?EvenQ] := tm[n] = tm[n/2]; tm[n_] := tm[n] = 1 - tm[(n - 1)/2]; Reap[For[n = 0, n <= 6000, n++, If[tm[n] + tm[n + 8] == 1, Sow[n]]]][[2, 1]] (* _G. C. Greubel_, Jan 05 2018 *) %o A161673 (PARI) is(n)=hammingweight(n)%2!=hammingweight(n+8)%2 \\ _Charles R Greathouse IV_, Aug 20 2013 %Y A161673 Cf. A161639, A161641, A161627, A161579, A161580, A121539, A079523, A131323, A036554, A010060, A121539, A079523, A081706. %K A161673 nonn %O A161673 1,3 %A A161673 _Vladimir Shevelev_, Jun 16 2009 %E A161673 Edited and extended by _R. J. Mathar_, Sep 02 2009