%I A099994
%S A099994 0,2,4,6,8,11,33,55,77,99,111,131,151,171,191,212,232,252,
%T A099994 272,292,313,333,353,373,393,414,434,454,474,494,515,535,555,
%U A099994 575,595,616,636,656,676,696,717,737,757,777,797,818,838,858,878,898,919,
               939,959,979,999,1111,1331,1551,1771,1991
%N A099994 Bisection of A002113.
%t A099994 r[n_]:=FromDigits[Reverse[IntegerDigits[n]]];v={}; Do[If[r[n]==n, v=Append[v, 
               n]], {n, 0, 2200}];Table[v[[2k-1]], {k, Floor[Length[v]]/2}]
%Y A099994 Sequence in context: A068062 A088169 A061563 this_sequence A068065 A028328 
               A092990
%Y A099994 Adjacent sequences: A099991 A099992 A099993 this_sequence A099995 A099996 
               A099997
%K A099994 nonn,base,easy
%O A099994 1,2
%A A099994 N. J. A. Sloane (njas(AT)research.att.com), Nov 20 2004
%E A099994 Extended with Mathematica program by Farideh Firoozbakht (mymontain(AT)yahoo.com), 
               Dec 01 2004