网站大量收购闲置独家精品文档,联系QQ:2885784924

机器视觉课内实验资料.doc

  1. 1、本文档共25页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
机器视觉课内实验报告 (4次) 学 院: 自动化 班 级: 智能 姓 名: 学 号: 目 录 实验一:一种摄像机标定算法的编程实现……………………… 1 实验二:图像预处理算法的编程实现…………………………… 8 实验三:基于一阶微分算子的边缘检测………………………… 14 实验四:基于二阶微分算子的边缘检测………………………… 17 PAGE \* MERGEFORMAT PAGE \* MERGEFORMAT - 1 - 《机器视觉》 课内实验报告(1) 摄像机标定算法的编程实现 专 业 : 智能科学与技术 班 级 : 学 号 : 姓 名 : 实验时间 : PAGE \* MERGEFORMAT PAGE \* MERGEFORMAT - 1 - 实验一 MATLAB编程实现基于直接线性变换的摄像机标定方法 一、实验目的 掌握摄像机标定方法的原理,采用直接线性变换方法,通过MATLAB编程实现摄像机内参数和外参数的估计。 实验原理 摄像机标定是指建立摄像机图像像素位置与场景点位置之间的关系,其途径是根据摄像机模型,由已知特征点的图像坐标求解摄像机的模型参数。 直接线性变换是将像点和物点的成像几何关系在齐次坐标下写成透视投影矩阵的形式: 其中(u,v,1)为图像坐标系下的点的齐次坐标,(X,Y,Z)为世界坐标系下的空间点的欧氏坐标,P为3*4的透视投影矩阵,s为未知尺度因子。 消去s,可以得到方程组: 当已知N个空间点和对应的图像上的点时,可以得到一个含有2*N个方程的方程组: 三、实验步骤 1 读取一幅图像并显示; 2 检查内存(数组)中的图像; 3 实现图像直方图均衡化; 4 读取图像中像素点的坐标值; 5 保存图像; 6 检查新生成文件的信息; 7 使用阈值操作将图像转换为二值图像; 8 根据RGB图像创建一幅灰度图像; 9 调节图像的对比度; 10 在同一个窗口内显示两幅图像; 11 掌握Matlab命令及函数,获取标定块图像的特征点坐标; 12 根据DLT摄像机标定方法原理编写Matlab程序,估计摄像机内参数和外参数; 四、程序代码及实验结果显示 代码: I=imread(C:\Users\wwww\Desktop\12.jpg); imshow(I); whos figure, I1=rgb2gray(I); figure,imshow(I1) imhist(I1); I2=histeq(I1); figure,imshow(I2) figure,imhist(I2) a=imread(C:\Users\wwww\Desktop\12.jpg); imwrite(I1,DSgray.jpg); imwrite(I2,DSgrayeq.jpg); inf=imfinfo(C:\Users\wwww\Desktop\12.jpg); level=graythresh(I2); bw=im2bw(I2,level); figure,imshow(bw) whos I3=imadjust(I2,stretchlim(I2),[0 1]); figure,imshow(I3); a=imread(C:\Users\wwww\Desktop\12.jpg); b=imread(DSgray.jpg); subplot(1,2,1),imshow(a); subplot(1,2,2),imshow(b); clear; xpot=[]; ypot=[]; imshow(C:\Users\wwww\Desktop\12.jpg); hold on; n=input(Please input the number of pot:); for i=1:n [x,y]=ginput(1); plot(x,y,or); text(x+1,y+1,num2str(i)); xpot=[xpot,x]; ypot=[ypot,y]; end [xpot;ypot] [xw;yw;zw] a=[xw,yw,zw,ones([100 1]),zeros([100 4]),(-1)*xpot.*xw,(-1)*xpot.*yw,(-1)*xpot.*zw,-1*xpot;zeros([100 4]),xw,yw,zw,ones([100 1]),(-1)*ypot.*xw,(-1)*ypot.*yw,(-1)*ypot.*zw,-1*ypot];

文档评论(0)

yaocen + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档