%Ejercicio 2 % Apartado b) %Beltrán Gutiérrez [NUMEROS,TEXTO,RESTO]=xlsread('sotaventogaliciaanual.xlsx'); k0=mean(NUMEROS); c0=std(NUMEROS)^2; y=histc(NUMEROS,0:25); frecuencias=y/sum(y); a0=[c0 k0]; x=0:25; x=x'; f=@(a,x) (a(1)/a(2))*((x/a(2)).^(a(1)-1)).*exp(-(x/a(2)).^a(1)); af=nlinfit(x,frecuencias,f,a0); xd=linspace(0,25); yd=f(af,xd); bar(0:25,frecuencias) hold on plot(xd,yd)
