%I
%S 2,4,5,6,8,9,12,14,16,17,18,20,21,24,25,26,29,30,31,34,36,38,39,40,42,
%T 43,46,47,48,51,53,55,56,57,60,62,63,64,66,67,70,72,74,75,76,78,79,82,
%U 84,86,87,88,90,91,94,95,96,99,100,101,104,106,108,109
%N Positions of 0 in A285034; complement of A285036.
%C Conjecture: 1 < n*r  a(n) < 2 for n>=1, where r = 1 + sqrt(1/2).
%H Clark Kimberling, <a href="/A285035/b285035.txt">Table of n, a(n) for n = 1..10000</a>
%e As a word, A285034 = 10100010..., in which 0 is in positions 2,4,5,6,8,9,11,...
%t s = Nest[Flatten[# /. {0 > {1, 0}, 1 > {0, 0, 1}}] &, {0}, 9]; (* A285034 *)
%t Flatten[Position[s, 0]]; (* A285035 *)
%t Flatten[Position[s, 1]]; (* A285036 *)
%Y Cf. A285034, A285036.
%K nonn,easy
%O 1,1
%A _Clark Kimberling_, Apr 19 2017
