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')