对于强度影像 - ecaa, ntu.ppt

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 色階分佈(Histogram) 觀看色階 使用指令imhist(A) 儲存色階數值 使用指令[count,X]=imhist(A) 不同色層 使用指令R=A(:,:,1) imggray05.m function imggray05 [X,map] = imread(annietest.bmp); R=X(:,:,1); G=X(:,:,2); B=X(:,:,3); imview(X); imview(R); imview(G); imview(B); Imgerode01.m % Imgerode01.m clear all;close all;clc; %cir=imread(cir.jpg); cir=imread(annie.bmp); figure, subplot(2,2,1);imshow(cir);xlabel(original);hold on; cir=im2bw(cir,.5);% 將cir圖檔二值化 subplot(2,2,2); imshow(cir);xlabel(bw (binary));hold on; N=1; N=ones(abs(N)); cir=imdilate(cir,N); % imdilate 膨脹 subplot(2,2,3); imshow(cir);xlabel(dilate);hold on; N=-1; N=ones(abs(N)); cir=imerode(cir,N); % imerode 侵蝕 subplot(2,2,4); imshow(cir);xlabel(erode);hold off; 影像侵蝕Erode imerode(A,N) 影像膨脹Dilate imdilate(A,N) Imgresize01.m IMRESIZE Resize image. IMRESIZE resizes an image of any type using the specified interpolation method. Supported interpolation methods include: ‘nearest’ (default) nearest neighbor interpolation bilinear bilinear interpolation bicubic bicubic interpolation B = IMRESIZE(A, M, METHOD) A, B 為影像 M1 放大，1 縮小 imgresize01.m % imgresize01.m clear all;close all;clc; %cir1=imread(cir.jpg); cir1=imread(annie.bmp); resize=0.5; cir2=imresize(cir1,resize); figure,imshow(cir1) figure,imshow(cir2) * 目標區域影像 縮小成1/4影像 imaoi.m clear all;close all;clc; image01=imread(media.tif); %影像讀取 image01=rgb2gray(image01);%影像灰階化 image01=imcircle(image01,-70,0.15);% 選取圓形區域影像 imk3=[media_B.tif]; imwrite(uint8(image01),imk3);% 儲存選取圓形區域影像 * Subprogram: imcircle.m function select_c=imcircle(image,N,tt); % 將一圓形圖二值化→再膨脹或侵蝕， % 再選擇圓之大小的區域。 % Cir 為圓形範本圖檔 cir=imread(cir.jpg); cir=im2bw(cir,.5);% 將cir圖檔二值化 % 對圓形範本做侵蝕或膨脹 % Note：imerode =侵蝕 % Note：imdilate =膨脹 if N0 N=ones(abs(N)); cir=imdilate(cir,N); elsei