Create poligono-hist.R