下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、word 数控技术 -作业21. 请采用Matlab实现逐点比拟法或数字积分法插补,并验证。提交m代码、插补结果图function myfun = pbpCircleintpol(x0, y0, x1, y1)area = max(max(x0,y0),max(x1,y1);plot(0 0,area area);grid onset(gca,'XTick',0:1:area)set(gca,'YTick',0:1:area) line(x0 x1,y0,y1);hold on;grid onnum = abs(x0-x1) + abs(y0-y1);px =
2、x0;py = y0;k0=(y1-y0)/(x1-x0);k=k0;for i=1:numlastX = px;lastY = py; if (k>k0)py = py + 1;elsepx = px - 1;endline(lastX px,lastY py,'Marker','.','Color','r','Linestyle','-','LineWidth',2);k = (y1-py)/(x1-px);pause(.5); end1)逐点比拟法以(7,0)为起点,(0
3、,7)为终点逆时针插补圆弧为例x0=7;y0=0;x1=0;y1=7; %给起点和终点赋坐标值step=abs(x0-x1)+abs(y0-y1); %步长r0=x02+y02;
4、60; %理论圆半径值的平方for i=1:stepxi=x0;yi=y0; %前一步坐标ri=xi2+yi2; &
5、#160; %当前位置半径平方if(ri<r0) %判断当前位置是否在圆内y0=yi+1;elsex0=xi-1;endline(x0,xi,y0,yi); &
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 定金合同范本
- 2024年度演艺经纪代理合同2篇
- 二零二四年度云计算服务定制与运维合同
- 二零二四年度电动折叠自行车购销协议3篇
- 短期劳动力雇佣合同04
- 高级定制服装生产与销售合同(04版)
- 二零二四年度社交电商模式创新与合作合同3篇
- 二零二四年度广告媒体投放合作协议
- 二零二四年度地下水监测井建设合同
- 二零二四年度技术转让合同with技术改进与后续支持
- 新实用汉语课本16课
- 金融企业详细划分标准出台-共分大中小微四类型
- 南芳学校学生“双姿”日常考核方案
- 网络安全检查表完整参考模板
- 铝基合金高温相变储热材料
- 三位数乘两位数计算题360道
- 《跨文化交际》课程教学大纲(英语师范专业)
- PIV操作流程详解要点
- 在“家庭医生签约服务”工作推进会上的发言稿
- 火力发电厂生产过程-ppt课件
- 领导在思想作风纪律总结大会讲话
评论
0/150
提交评论