<html>
  <head>

    <meta http-equiv="content-type" content="text/html; charset=utf-8">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    Boa noite!<br>
    <br>
    Tenho uma base de dados em que uma das variáveis (HScode) possui
    três níveis. Por exemplo, <br>
    <br>
    01<br>
    0101<br>
    010122<br>
    0102<br>
    010233<br>
    02<br>
    0201<br>
    020179<br>
    <br>
    Contudo preciso de um subset apenas com as observações com quatro
    dígitos. Ou seja,<br>
    <br>
    0101<br>
    0102<br>
    0201<br>
    <br>
    structure(list(reporter = c("Albania", "Albania", "Albania", <br>
    "Albania", "Albania", "Albania", "Albania", "Albania", "Albania", <br>
    "Albania", "Albania", "Albania", "Albania", "Albania", "Albania", <br>
    "Albania", "Albania", "Albania", "Albania", "Albania", "Albania", <br>
    "Albania", "Albania", "Albania", "Albania", "Albania", "Albania", <br>
    "Albania", "Albania", "Albania", "Albania", "Albania", "Albania", <br>
    "Albania", "Albania"), HScode = c("01", "0101", "010110", "010190",
    <br>
    "0102", "010210", "010290", "0103", "010310", "010391", "010392", <br>
    "0104", "010410", "010420", "0105", "010511", "010512", "010519", <br>
    "010594", "010599", "0106", "010611", "010612", "010619", "010620",
    <br>
    "010631", "010632", "010639", "010690", "02", "0201", "020110", <br>
    "020120", "020130", "0202"), boundtariff = c("6.571969696969697", <br>
    "8.75", "7.5", "10", "7.291666666666667", "5", "9.583333333333334",
    <br>
    "5", "5", "5", "5", "5", "5", "5", "9.5", "5", "5", "5", "12.5", <br>
    "20", "5", "5", "5", "5", "5", "5", "5", "5", "5",
    "10.27914614121511", <br>
    "10", "10", "10", "10", "10")), datalabel = "", time.stamp = " 7 Jul
    2016 22:53", .Names = c("reporter", <br>
    "HScode", "boundtariff"), formats = c("%54s", "%9s", "%20s"), types
    = c(54L, <br>
    7L, 20L), val.labels = c("", "", ""), var.labels = c("", "", <br>
    ""), version = 12L, row.names = c("1", "2", "3", "4", "5", "6", <br>
    "7", "8", "9", "10", "11", "12", "13", "14", "15", "16", "17", <br>
    "18", "19", "20", "21", "22", "23", "24", "25", "26", "27", "28", <br>
    "29", "30", "31", "32", "33", "34", "35"), class = "data.frame")<br>
    <br>
    <br>
    Alguém saberia como fazer isso?<br>
    <br>
    <br>
    Desde já muito obrigado!<br>
    <br>
    <br>
    <br>
    <div class="moz-signature">-- <br>
      <meta http-equiv="content-type" content="text/html; charset=utf-8">
      <title></title>
      <font size="1"><b>Alexandre Rodrigues Loures</b><br>
        Doutorando em Economia Aplicada<br>
        Universidade Federal da Paraíba - UFPB<br>
        Centro de Ciências Sociais Aplicadas - CCSA<br>
        Programa de Pós-Graduação em Economia - PPGE<br>
        Site: <a class="moz-txt-link-abbreviated" href="http://www.ccsa.ufpb.br/ppge">www.ccsa.ufpb.br/ppge</a><br>
        <img alt="orcid" src="cid:part1.69FFCD9C.76A8B5A1@ymail.com"
          height="16" width="16"> <a class="moz-txt-link-abbreviated" href="http://www.orcid.org/0000-0002-1288-0135">www.orcid.org/0000-0002-1288-0135</a></font>
    </div>
  </body>
</html>