ejercicio 2
Contents
apartado b
velocidad=xlsread('sotaventogaliciaanual.xlsx');
x=0.5:1:max(velocidad);
promedio=mean(velocidad);
destd=std(velocidad);
interv=hist(velocidad,x);
convierte a frecuencias y ajusta la función de Weibull
frec=interv/sum(interv);
f=@(a,x) (a(1)/a(2))*((x/a(2)).^(a(1)-1)).*exp(-(x/a(2)).^a(1));
a0=[promedio destd^2];
af=nlinfit(x,frec,f,a0)
hold on
af =
2.3849 6.0208
diagrama de frecuencias
bar(x,frec,'y')
representa la curva de ajuste
x=linspace(0,max(velocidad),100);
y=f(af,x);
plot(x,y,'r')
title('Ajuste a la función Weibull')
