机械原理课程设计源程序.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
七.源程序以及运动线图 1.根据运动分析的数学模型,将已知参数代入,即可应用计算机计算,应用MATLAB编程绘出机构的位置线图、速度线图、加速度线图。 结果分析:牛头刨床是用于加工中小尺寸的平面或直槽的金属切削机床,要求主执行构件—刨刀能以数种不同速度、不同行程和不同起始位置作水平往复直线移动,且切削时刨刀的移动速度低于空行程速度,即刨刀具有急回现象。由图看出刨头在工作行程中,刨头的速度比较平稳,基本符合要求。刨头在空回行程中,刨刀回程速度较高,符合生产力的要求。 2.应用计算机计算,用MATLAB编程作出机构的惯性力及惯性力矩图、原动件上的平衡力矩Mp图。 Mp= -FR32x×L2sinφ-FR32y×L2cosφ 由图中看出刨刀在其要求的实际工作区力矩较为平稳,能够顺利完成切削运动。综合看来,设计尺寸基本符合实际要求。 3.源程序 clear all;clc; theta1=linspace(-8.16,351.84,100); theta1=theta1*pi/180; W1=80*pi/30; H=0.32; L1=0.092; L3=1.095; L4=0.300; L6=0.650; L6u=1.089; Z=pi/180; S3=((L6)^2+(L1)^2-2*L6*L1*cos(theta1+pi/2)).^0.5; for i=1:100 theta3(i)=acos(L1*cos(theta1(i))/S3(i)); theta4(i)=asin((L6u-L3*sin(theta3(i)))/L4); S6(i)=L3*cos(theta3(i))+L4*cos(theta4(i)); end for i=1:100 J= inv([cos(theta3(i)),-S3(i)*sin(theta3(i)),0,0; sin(theta3(i)),S3(i)*cos(theta3(i)),0,0; 0,-L3*sin(theta3(i)),-L4*sin(theta4(i)),-1; 0,L3*cos(theta3(i)),L4*cos(theta4(i)),0]); K=J*W1*[-L1*sin(theta1(i));L1*cos(theta1(i));0;0]; VS3(i)=K(1); W3(i)=K(2); W4(i)=K(3); V6(i)=K(4); end for i=1:100 J= inv([cos(theta3(i)),-S3(i)*sin(theta3(i)),0,0; sin(theta3(i)),S3(i)*cos(theta3(i)),0,0; 0,-L3*sin(theta3(i)),-L4*sin(theta4(i)),-1; 0,L3*cos(theta3(i)),L4*cos(theta4(i)),0]); P=W1*W1*[-L1*cos(theta1(i));-L1*sin(theta1(i));0;0]; M=[-W3(i)*sin(theta3(i)),-VS3(i)*sin(theta3(i))-S3(i)*W3(i)*cos(theta3(i)),0,0; W3(i)*cos(theta3(i)),VS3(i)*cos(theta3(i))-S3(i)*W3(i)*sin(theta3(i)),0,0; 0,-L3*W3(i)*cos(theta3(i)),-L4*W4(i)*cos(theta4(i)),0; 0,-L3*W3(i)*sin(theta3(i)),-L4*W4(i)*sin(theta4(i)),0]; N=[VS3(i);W3(i);W4(i);V6(i)]; K=J*(-M*N+P); aS3(i)=K(1); a4(i)=K(2); a5(i)=K(3); a6(i)=K(4); end G4=160; G5=40; G6=680; Fc=1600; m4=16; m5=4; m6=68; J4=1.6; J5=0.03; uJ4=J4+m4*0.5*0.5*L3*L3; a(i)=L4*cos(theta4(i))/cos(theta3(i))

文档评论(0)

skewguj + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档