function hen = cost_suburban(distancia, frequencia, hte, hre)

   for k = 1 : length(distancia),
      perda = 46.30 + 33.90*log10(frequencia) - 13.82*log10(hte) + (44.9 - 6.55*log10(hte))*log10(distancia(k));
      perda = perda -(3.2*log10(11.75*hre)^2 - 4.79);
      perda = perda - 12.28; 
      hen(k) = perda;
   end