眼睛血管检测matlab源码程序 - vb源码程序 - 谷速源码
下载频道> 资源分类> 编程语言> VB源码> 眼睛血管检测matlab源码程序

标题:眼睛血管检测matlab源码程序
分享到:

所属分类: VB源码 资源类型:程序源码 文件大小: 5.66 KB 上传时间: 2016-01-24 21:27:29 下载次数: 10 资源积分:1分 提 供 者: 马云 眼睛血管检测matlab源码程序
内容:
眼睛血管检测matlab源码程序,程序员在编程的过程中可以参考学习使用,希望对IT程序员有用,此源码程序简单易懂、方便阅读,有很好的学习价值!
部分代码如下:
 
%%
clear
clc
im=imread('Retina_drive_1.tif');
bw_mask=imread('Retina_drive_1_mask.gif');
bw_mask=logical(bw_mask);
ref_im=imread('Retina_drive_1_Ref.gif');
%
im=im(:,:,2);
im=mat2gray(im).*mat2gray(bw_mask);
im=imcomplement(im);% Assume vessels are lighter than background
im=im2double(im);
ref_bw=im2bw(ref_im,0.5);
%%
DEG_NUM=12;
LEN_c=11;
LEN_o=11;
LEN_diff=7;
%
ic1=reconstruction_by_dilation(im,LEN_c,DEG_NUM);
io1=min_openings(im,LEN_o,DEG_NUM);
iv=mat2gray(ic1-io1);
imDiff=smooth_cross_section(iv,LEN_diff,LEN_c);
imL=reconstruction_by_dilation(imDiff,LEN_c,DEG_NUM);
imF=reconstruction_by_erosion(imL,LEN_c,DEG_NUM);
figure,imshow(iv);title('iv');
figure,imshow(imDiff);title('imDiff');
figure,imshow(imL);title('imL');
figure,imshow(imF);title('imF');
%% Hysteresis thresholding
TH_LOW=30;
TH_HIGH=40;
min_obj=180;
min_hole=10;
%
mask=im2bw(imF,TH_LOW/255);
marker=im2bw(imF,TH_HIGH/255);
bw_result=imreconstruct(marker,mask);
%
% some extra cleaning on the result.
bw_result=bw_result& bw_mask;
bw_result = clear_bw(bw_result, min_obj, min_hole);
%
figure,imshow(bw_result);title('result');
r=eval_metrics(bw_result,ref_bw,bw_mask);
fprintf('TPR=%g\n FPR=%g\n accuracy=%g\n precision=%g\n',...
    r(1),r(2),r(3),r(4));

关键词: 血管 源码 眼睛

编程语言下载排行

Top_arrow
回到顶部
联系方式| 版权声明| 招聘信息| 广告服务| 银行汇款| 法律顾问| 兼职技术| 付款方式| 关于我们|
网站客服网站客服 程序员兼职招聘 程序员兼职招聘
沪ICP备19040327号-3
公安备案号:沪公网安备 31011802003874号
库纳格流体控制系统(上海)有限公司 版权所有
Copyright © 1999-2014, GUSUCODE.COM, All Rights Reserved