Tutorial Difuso
Páginas: 2 (451 palabras)
Publicado: 8 de diciembre de 2012
Alumno Alpizar Torres Antonio #304186200 Tarea “%programa para control difuso de frenado.” Entradas, velocidad y distancia. Salida frenado. d=input(' VALOR DE LA DISTANCIA v=input(' VALOR DE LAVELOCIDAD disp=distpeq(d); dism=distmed(d); disg=distgran(d); velp=velpeq(v); velm=velmed(v); velg=velgran(v); dist=[disp,dism,disg] vel=[velp,velm,velg] %PARAMETROS DE LAS GRAFICAS d1=0:1/200:25; y1=1;d2=25:1/200:50; y2=-0.04*d2+2; d3=25:1/200:50; y3=0.04*d3-1; d4=50:1/200:75; y4=-0.04*d4+3; d5=50:1/200:75; y5=0.04*d5-2; d6=75:1/200:100; y6=1; %SUBPLOT1 DISTANCIA subplot(3,1,1)plot(d1,y1,'r',d2,y2,'r',d3,y3,'g',d4,y4,'g',d5,y5,'b',d6,y6,'b') hold on plot(d,[disp,dism,disg],'O') xlabel('distancia') ylabel('u') grid on hold off %SUBPLOT2 VELOCIDAD subplot(3,1,2)plot(d1,y1,'y',d2,y2,'y',d3,y3,'g',d4,y4,'g',d5,y5,'b',d6,y6,'b') hold on plot(v,[velp,velm,velg],'O') xlabel('velocidad') ylabel('u') grid on hold off %evaluacion de reglas DIS=[disp,dism,disg]; VEL=[velp,velm,velg]; frenado=[1:1:9];k=1; for i=1:3; for j=1:3; frenado(k)=min(DIS(i),VEL(j)); k=k+1; ') %VALOR DE LA DISTANCIA A EVALUAR ') %VALOR DE LA VELOCIDAD A EVALUAR
end end %AGREGACIONfbajo=max(frenado(4),max(frenado(7),frenado(8))) fmedio=max(frenado(9),max(max(frenado(1),frenado(2)),max(frenado(5),frenado(6)))) falto=frenado(3) %desdifucion subplot(3,1,3) xlabel('frenado') ylabel('u') grid on x=[0;1;100]; grid on holdon %calculo del centroide por medio del promedio pesado intx=0; int=0; for h=1:100; int=int+((max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo)))));intx=intx+((max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo))))*h); plot(h,(max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo)))),'*') hold on end z=intx/(int) ------------------------------------------------------------------------------------------salida alejecutarlo para 30m y 40Km/hr VALOR DE LA DISTANCIA d =30 VALOR DE LA VELOCIDAD v =40 dist =0.8000 0.2000 vel =0.4000 0.6000 fbajo =0.2000 fmedio =0.6000 falto =0 z =42.644 30 40 0 0
1 0.5 0
u
0...
end end %AGREGACIONfbajo=max(frenado(4),max(frenado(7),frenado(8))) fmedio=max(frenado(9),max(max(frenado(1),frenado(2)),max(frenado(5),frenado(6)))) falto=frenado(3) %desdifucion subplot(3,1,3) xlabel('frenado') ylabel('u') grid on x=[0;1;100]; grid on holdon %calculo del centroide por medio del promedio pesado intx=0; int=0; for h=1:100; int=int+((max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo)))));intx=intx+((max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo))))*h); plot(h,(max(fg(h,falto),max(fm(h,fmedio),fp(h,fbajo)))),'*') hold on end z=intx/(int) ------------------------------------------------------------------------------------------salida alejecutarlo para 30m y 40Km/hr VALOR DE LA DISTANCIA d =30 VALOR DE LA VELOCIDAD v =40 dist =0.8000 0.2000 vel =0.4000 0.6000 fbajo =0.2000 fmedio =0.6000 falto =0 z =42.644 30 40 0 0
1 0.5 0
u
0...
Leer documento completo
Regístrate para leer el documento completo.