%%
clear
% IDIOMA = 'Holandes';
IDIOMA = 'Portugues';
% IDIOMA = 'Ingles';
A = importdata( sprintf( 'Lista_Limpa_%s.txt',IDIOMA), ';' );
% A = importdata( ['Lista_Limpa_' IDIOMA '.txt'], ';' );
M = A{1};
onde_espaco = find( M==' ' );
Tamanhos = (onde_espaco(2:end)-onde_espaco(1:end-1))-1;
figure
hist( Tamanhos, 1:max(Tamanhos) )
title( IDIOMA )
