%I #13 Sep 14 2013 02:12:00
%S 6,9,14,16,20,22,23,28,32,33,35,36,38,39,42,48,51,52,53,54,57,59,60,
%T 62,66,72,77,78,82,83,84,85,86,87,88,90,92,94,95,96,102,103,107,110,
%U 113,114,118,120,122,124,125,126,127,130,132,133,134,135,136,139
%N Numbers which are not a denominator of a rational number having a continued fraction consisting entirely of 1s and 2s; complement of A228803.
%C Related to Zaremba's conjecture.  _Charles R Greathouse IV_, Sep 12 2013
%H Vincenzo Librandi, <a href="/A228804/b228804.txt">Table of n, a(n) for n = 1..1000</a>
%t t = Sort[Union[Denominator[Map[FromContinuedFraction, Flatten[Map[Tuples[{1, 2}, #] &, Range[15]], 1]]]]]; c = Complement[Range[200], t]
%Y Cf. A228803, A228805.
%K nonn,easy
%O 1,1
%A _Clark Kimberling_, Sep 04 2013
