Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- %----------------------------------------------------------------------------
- % INTELIGENCIA ARTIFICIAL - 2024 - TP01
- %----------------------------------------------------------------------------
- % 6. Script 2. Dada la siguiente matriz booleana, diseñar un script que:
- % a) Dada la matriz booleana simbolizada en la figura adjunta, diseñar
- % un script que genere 15 matrices booleanas, del miso tamño, conteniendo
- % cada una 15 “unos” dispuesto en forma aleatoria.
- % a1) Comparar las 15 matrices con la matriz de muestra e identifcar
- % las matrices de mayor y menor similitud.
- % a2) Por cada comparacion realizada generar un indice de similitud
- % (IS pertenece a R) entre 0 y 1 (un valor IS=1 significa que las
- % matrices son iguales). Orientacion: investigar el indice de Jaccard
- % Comparar imagenes
- % https://la.mathworks.com/help/images/ref/imshowpair.html
- % Convertir imagen en matriz, viceversa
- % https://la.mathworks.com/help/images/ref/mat2gray.html#d126e91831
- % InitialMagnification
- % https://la.mathworks.com/help/images/ref/imshow.html?searchHighlight=imshow&s_tid=srchtitle_support_results_2_imshow#bvmnrxi-1-Reduce
- %----------------------------------------------------------------------------
- % Variables
- clc
- matrixAND=zeros(10,10);
- successN=0;
- booleanMatrix=zeros(10,10);
- IS=0;
- %----------------------------------------------------------------------------
- % Matriz Original
- booleanMatrixOriginal=zeros(10,10);
- booleanMatrixOriginal(2,7)=1;
- booleanMatrixOriginal(3,[5 6 8])=1;
- booleanMatrixOriginal(4,[4 9])=1;
- booleanMatrixOriginal([5 6],[3 10])=1;
- booleanMatrixOriginal(7,[2 10])=1;
- booleanMatrixOriginal(8,3)=1;
- booleanMatrixOriginal(9,4)=1;
- booleanMatrixOriginal(10,5)=1;
- %----------------------------------------------------------------------------
- % Comparo
- for i=1:15
- booleanMatrixOriginal
- booleanMatrix=booleanMatrixRandom()
- matrixAND=booleanMatrixOriginal & booleanMatrix
- successN=size((find(matrixAND)),1);
- switch successN
- case {1,2,3}
- disp('La similitud es baja')
- disp('INDICE DE SIMILITUD: ')
- IS=successN/15
- case{4,5,6,7}
- disp('La similitud sigue siendo baja')
- disp('INDICE DE SIMILITUD: ')
- IS=successN/15
- case {8,9,10,11,12,13,14}
- disp('Son casi identicas: ')
- disp('INDICE DE SIMILITUD: ')
- IS=sucessN/15
- case 15
- disp('FELICITACIONES!!!...')
- disp('Son identicas')
- disp('INDICE DE SIMILITUD: ')
- IS=1
- otherwise
- disp('Ambas matrices son distintas')
- disp('INDICE DE SIMILITUD: ')
- IS
- end
- scriptGraphicOptional(booleanMatrixOriginal,booleanMatrix,matrixAND)
- fprintf('----------------------------------- \n')
- pause
- close
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
