%I A095111
%S A095111 1,0,0,0,1,0,1,1,0,1,1,1,0,0,1,1,1,0,1,0,0,0,1,1,1,0,1,0,0,1,0,0,0,1,0,
%T A095111 1,1,1,0,1,0,0,1,0,0,0,1,1,0,0,0,1,0,1,1,0,1,1,1,0,1,0,0,1,0,0,0,1,1,0,
%U A095111 0,0,1,0,1,1,1,0,0,0,1,0,1,1,0,1,1,1,0,0,1,1,1,0,1,0,0,1,0,0,0,1
%N A095111 One minus the parity of 1-fibits in Zeckendorf expansion A014417(n).
%H A095111 <a href="Sindx_Ch.html#char_fns">Index entries for characteristic functions</
a>
%F A095111 a(n)=a'(n+1) where a'(1)=1 and if n>=2 with F(k)<n<=F(k+1) a'(n)=1-a'(n-F(k))
where F(k)=A000045(k). E, g. F(5)=5<6<=F(6)=8 thus a'(6)=1-a'(1)=0
and a(5)=0 - Benoit Cloitre (benoit7848c(AT)orange.fr), May 10 2005
%Y A095111 a(n) = A010059(A003714(n)). a(n) = 1 - A095076(n). Characteristic function
of A095096. Run counts are given by A095276.
%Y A095111 Cf. A105774.
%Y A095111 Sequence in context: A141728 A141737 A089011 this_sequence A166253 A159638
A120528
%Y A095111 Adjacent sequences: A095108 A095109 A095110 this_sequence A095112 A095113
A095114
%K A095111 nonn
%O A095111 0,1
%A A095111 Antti Karttunen (His-Firstname.His-Surname(AT)iki.fi), Jun 01 2004
|