processing.rar_边缘算法提取

clc; clear all; I=imread('lena.jpg'); %I=imread('e:\m\baboon256.bmp'); %I=imread('e:\m\okrand256.bmp'); %I=im2double(I); figure,imshow(I,[]); fun=@(x) entropyofimage(x,256)*ones(size(x)); J1 = blkproc(I,[8 8],fun); figure,imshow(J1,[]); fun=@(x) std2(x)*ones(size(x)); J2 = blkproc(I,[8 8],fun); figure,imshow(J2,[]); fun=@(x) mean2(x)*ones(size(x)); J3 = blkproc(I,[8 8],fun); figure,imshow(J3,[]); fun=@(x) textureofblock(x)*ones(size(x)); J4 = blkproc(I,[8 8],fun); figure,imshow(J4,[]); BW=edge(I,'canny'); figure,imshow(BW); fun=@(x) textureindct(x,mean2(I))*ones(size(x)); J5= blkproc(I,[8 8],fun); figure,imshow(J5,[]);