OFFSET
1,1
MATHEMATICA
b11Q[n_]:=Module[{dc=DigitCount[n, 11]}, dc[[1]]==dc[[9]]>0]
Select[Range[1200], b11Q] (* Harvey P. Dale, Feb 27 2011 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved