HERRERA GARCÍA MICHELL-TAREA 1

Vista previa del material en texto

BENEMÉRITA UNIVERSIDAD AUTÓNOMA DE PUEBLA
FACULTAD DE INGENIERÍA QUIMICA
Michell Herrera García 201527690
Aplicaciones de Control por IA
TAREA 1: Graficar las diferentes funciones de la lógica difusa.
Funciones en la lógica difusa
1. Funciones de Negación
1.1 Negación difusa estándar
1.2 Familia de negaciones Sugeno
1.3 Familia de Negaciones de Yager
1.4 Código
%Funciones de negación
hold on
syms a
a=0:0.01:1;
 
%Función de negación difusa estándar
fn=1-a;
plot(a,fn,'y')
grid on
title('Gráfica de funciones de negación')
xlabel('a')
ylabel('f¬')
 
%Función de Familia de Negaciones de Sugeno
b1=1;
b2=5;
b3=25;
fn1=(1-a)./(1+(b1*a));
plot(a,fn1,'g')
fn2=(1-a)./(1+(b2*a));
plot(a,fn2,'g')
fn3=(1-a)./(1+(b3*a));
plot(a,fn3,'g')
 
%Función de Familia de Negaciones de Yager
b4=2;
b5=3;
b6=4;
fn4=(1-(a.^b4)).^(1./b4)
plot(a,fn4,'r')
fn5=(1-(a.^b5)).^(1./b5)
plot(a,fn5,'r')
fn6=(1-(a.^b6)).^(1./b6)
plot(a,fn6,'r')
1.5 Gráfico
Figura 1.1
2. Funciones de Conjunción
2.1 Conjunción difusa estándar
2.1.1 Código
%Función de Conjunción difusa estándar
[a,b]=meshgrid(0:0.02:1);
z1=min(a,b);
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f^')
title('Gráfico de conjunción difusa estándar')
2.1.2 Gráfico
Figura 2.1
2.2 Producto algebraico
2.2.1 Código
%Función de Producto algebraico
[a,b]=meshgrid(0:0.02:1);
z1=a.*b;
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de producto algebraico')
2.2.2 Gráfico
Figura 2.2
2.3 Diferencia acotada
2.3.1 Código
%Función de Diferencia Acotada
[a,b]=meshgrid(0:0.02:1);
z1=max(0,(a+b-1));
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de diferencia acotada')
2.3.2 Gráfico
Figura 2.3
2.4 Conjunción drástica
2.4.1 Código
%Función de Conjunción drástica
[a,b]=meshgrid(0:0.02:1);
if (a==1)
 z1==b
else if (b==1)
 z1==a
 else
 z1==0
 end
end
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de conjunción drástica')
2.4.2 Gráfico
Figura 2.4
3. Funciones de Disyunción
3.1 Disyunción difusa estándar
3.1.1 Código
%Función de Disyunción difusa estándar
[a,b]=meshgrid(0:0.02:1);
z1=max(a,b);
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de disyunción difusa estándar')
3.1.2 Gráfico
Figura 3.1
3.2 Suma algebraica
3.2.1 Código
%Función de Suma algebraica
[a,b]=meshgrid(0:0.02:1);
z1=a+b-(a.*b);
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Suma algebraica')
3.2.2 Gráfico
Figura 3.2
3.3 Suma acotada
3.3.1 Código
%Función de Suma acotada
[a,b]=meshgrid(0:0.02:1);
z1=min(1,(a+b));
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Suma acotada')
3.3.2 Gráfico
DFigura 3.3
3.4 Disyunción drástica
3.4.1 Código
%Función de Disyunción drástica
[a,b]=meshgrid(0:0.02:1);
if (a==0)
 z1==b
else if (b==0)
 z1==a
 else
 z1==1
 end
end
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Disyunción drástica')
3.4.2 Gráfico
Figura 3.4
4. Funciones de Implicación
4.1 Implicación de Lukasiewicz
4.1.1 Código
%Función de Implicación de Lukasiewicz
[a,b]=meshgrid(0:0.02:1);
z1=min(1,(1-a+b));
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Implicación de Lukasiewicz')
4.1.2 Gráfico
Figura 4.1
4.2 Implicación de Kleene
4.2.1 Código
%Función de Implicación de Kleene
[a,b]=meshgrid(0:0.02:1);
z1=max((1-a),b);
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Implicación de Kleene')
4.2.2 Gráfico
Figura 4.2
4.3 Implicación de Zadeh
4.3.1 Código
%Función de Implicación de Zadeh
[a,b]=meshgrid(0:0.02:1);
z1=max((1-a),(min(a,b)));
mesh(a,b,z1)
xlabel('a')
ylabel('b')
zlabel('f(a,b)')
title('Gráfico de Implicación de Zadeh')
4.3.2 Gráfico
Figura 4.3
Gráficos elaborados con: MATLAB R2020a.
Funciones
Negación
Conjunción
Disyunción
Implicación
Negación difusa estándar
Familia de negaciones Sugeno
Familia de negaciones Yager
Conjunción difusa estándar
Producto algebraico
Diferencia acotada
Conjunción drástica
Disyunción difusa estándar
Suma algebraica
Suma acotada
Disyunción drástica
Implicación de Lukasiewicz
Implicación de Kleene
Implicación de Zadeh
13 de septiembre de 2020
2