# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a280910
Showing 1-1 of 1

%I A280910 #17 Apr 05 2019 12:00:01
%S A280910 0,1,1,0,0,0,1,0,0,0,1,0,1,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,
%T A280910 0,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,
%U A280910 0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,1
%N A280910 Characteristic sequence of A277238.
%H A280910 Antti Karttunen, <a href="/A280910/b280910.txt">Table of n, a(n) for n = 0..65537</a>
%H A280910 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a>
%H A280910 <a href="/index/Ch#char_fns">Index entries for characteristic functions</a>
%o A280910 (PARI) A280910(n) = if(n<=1, n, my(b = binary(n)); if ((#b % 2) && (b[#b\2+1] == 0), return (0)); vecmin(vector(#b\2, k, bitxor(b[k], b[#b-k+1]))) == 1); \\ _Antti Karttunen_, Dec 23 2018, after isok function given in A277238 by _Michel Marcus_, Oct 07 2016
%Y A280910 Cf. A277238.
%K A280910 nonn
%O A280910 0
%A A280910 _Taylor J. Smith_, Jan 10 2017
%E A280910 Term a(0) = 0 prepended and more terms added by _Antti Karttunen_, Dec 23 2018

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE