matlab实现灰度图像roberts算子边缘检测

%Roberts算子提取边缘 
clear all;close all;
Im=imread（‘picture.bmp‘）;%读取原灰度图像，如果不是灰度图像，需要转换成灰度图像
Im_In=mat2gray（Im）
[HeightWeight]=size（Im_In）;%获取图像大小

Edge_Roberts=zeros（HeightWeight）;
Binary_Roberts=uint8（zeros（HeightWeight））;
%利用robertt‘s检测模板，采用范数1衡量梯度幅度，提取图像边缘
for i=1:Height-1
    for j=1:Weight-1
        A=double（Im_In（i+1j+1））-double（I