%I #10 Sep 12 2013 02:54:40
%S 0,1,2,3,4,5,6,7,8,9,10,12,12,14,14,16,16,18,18,21,21,21,23,23,25,25,
%T 27,27,29,29,30,32,32,34,34,36,36,38,38,41,41,41,43,43,45,45,47,47,49,
%U 49,50,52,52,54,54,56,56,58,58,61,61,61,63,63,65,65,67
%N Smallest number not less than n with alternating parities of digits in decimal representation.
%C A228722(n) <= n <= a(n) and A228710(a(n)) = 1;
%C a(A030141(n)) = A030141(n); a(A228709(n)) > A228709(n).
%C lim sup a(n)/n = 2080/1881. - _Charles R Greathouse IV_, Sep 12 2013
%H Reinhard Zumkeller, <a href="/A228723/b228723.txt">Table of n, a(n) for n = 0..10000</a>
%e a(100) = 101; a(1000) = 1010; a(10000) = 10101; a(100000) = 101010;
%e a(101) = 101; a(1001) = 1010.
%o (Haskell)
%o a228723 n = head [x | x <- [n..], a228710 x == 1]
%K nonn,base
%O 0,3
%A _Reinhard Zumkeller_, Aug 31 2013