myMI.m
上传用户:xueli1969
上传日期:2022-07-27
资源大小:19k
文件大小:1k
源码类别:

通讯编程文档

开发平台:

Matlab

  1. function [mi]=myMI(x,y,ang,structure)
  2. x=round(x);
  3. y=round(y);
  4. ang=round(ang);
  5. handles=structure;
  6. MIname=handles.MIname;
  7. J=handles.J;
  8. I=handles.I;
  9. se = translate(strel(1), [x y]);
  10. J = imdilate(J,se);
  11. J = imrotate(J,ang,'nearest','crop');
  12. I=double(I);
  13. J=double(J);
  14. if handles.NumOfVar==0
  15.     evstrg=strcat('feval(''',MIname,'''',',I,J',')');
  16. elseif handles.NumOfVar==1
  17.     var1=handles.var1;
  18.     evstrg=strcat('feval(''',MIname,'''',',I,J,var1',')');
  19. elseif handles.NumOfVar==2
  20.     var1=handles.var1;
  21.     var2=handles.var2;
  22.     evstrg=strcat('feval(''',MIname,'''',',I,J,var1,var2',')');
  23. end
  24.  mi=eval(evstrg); 
  25.