下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 机械原理 牛头刨床附录MATLAB编程部分

机械原理 牛头刨床附录MATLAB编程部分.doc

机械原理 牛头刨床附录MATLAB编程部分

周云清
2017-10-08 0人阅读 举报 0 0 暂无简介

简介:本文档为《机械原理 牛头刨床附录MATLAB编程部分doc》,可适用于综合领域

机械原理牛头刨床附录MATLAB编程部分课题:牛头刨床机构设计分析指导老师:王玉丹附录:MATLAB编程分析源程序:clearallclc初始条件theta=linspace(,,)单位度theta=theta*pi转换为弧度制W=*pi角速度单位radsH=行程单位mL=OA的长度单位mL=OB的长度单位mL=BF的长度单位mL=OO的长度单位m单位mLu=OD的长度Z=pi角度与弧度之间的转换dT=(theta()theta())W时间间隔forj=:t(j)=dT*(j)时间因素end求解S、Theta、Theta和SE四个变量S=((L)^(L)^*L*L*cos(thetapi))^求出OA的值fori=:求解角度theta、Theta和SE的长度theta(i)=acos(L*cos(theta(i))S(i))theta(i)=asin((LuL*sin(theta(i)))L)SE(i)=L*cos(theta(i))L*cos(theta(i))end求解完成求解完成求解VS、W、W和VE四个变量fori=:J=inv(cos(theta(i)),S(i)*sin(theta(i)),,sin(theta(i)),S(i)*cos(theta(i)),,,L*sin(theta(i)),L*sin(theta(i)),,L*cos(theta(i)),L*cos(theta(i)),)K=J*W*L*sin(theta(i))L*cos(theta(i))VS(i)=K()W(i)=K()W(i)=K()VE(i)=K()end求解完成求解aS、a、a、aE四个变量fori=:J=inv(cos(theta(i)),S(i)*sin(theta(i)),,sin(theta(i)),S(i)*cos(theta(i)),,,L*sin(theta(i)),L*sin(theta(i)),,L*cos(theta(i)),L*cos(theta(i)),)P=W*W*L*cos(theta(i))L*sin(theta(i))M=W(i)*sin(theta(i)),VS(i)*sin(theta(i))S(i)*W(i)*cos(theta(i)),,W(i)*cos(theta(i)),VS(i)*cos(theta(i))S(i)*W(i)*sin(theta(i)),,,L*W(i)*cos(theta(i)),L*W(i)*cos(theta(i)),,L*W(i)*sin(theta(i)),L*W(i)*sin(theta(i)),N=VS(i)W(i)W(i)VE(i)K=J*(M*NP)aS(i)=K()a(i)=K()a(i)=K()aE(i)=K()end求解完成动态静力分析初始条件M=M=M=Js=Js=Fc=Ls=*LLs=*L给切削阻力赋值fori=:if((abs(SE()SE(i))>*Habs(SE()SE(i))<*H)(theta(i)<pi))Fc(i)=elseFc(i)=endend赋值完成求解平衡力矩J=JsM*(*L)*(*L)导杆对点O的转动惯量fori=:Ekk(i)=(M*VE(i)*VE(i)Js*W(i)*W(i)M*VE(i)*VE(i)J*W(i)*W(i))计算总动能enddEkk()=Ekk()Ekk()动能的改变量fori=:dEkk(i)=Ekk(i)Ekk(i)动能的改变量endfori=:MM(i)=(dEkk(i)Fc(i)*abs(VE(i)))W求平衡力矩End画图画运动图figure()plot(t,theta,'r')holdonplotyy(t,theta,t,SE)gridonxlabel('时间ts')ylabel('theta、theta(rad)')title('角度Theta、theta和位移SE')axis(,,,)figure()plot(t,W,'r')holdongridonplotyy(t,W,t,VE)xlabel('时间ts')ylabel('W、W(rads)')title('角度速度W、W和速度VE')axis(,,,)figure()plot(t,a,'r')holdonplotyy(t,a,t,aE)gridonxlabel('时间ts')ylabel('a、a(radss)')title('角度加速度a、a和加速度aE')axis(,,,)运动图画完画反力图figure()plotyy(theta,Fc,theta,SE)xlabel('Theta,时间t,')ylabel('Fc')axis(theta(),theta(),,)title('切削阻力Fc与位移SE')gridonfigure()plotyy(theta,MM,theta,Fc)xlabel('Theta,时间t,')ylabel('力矩')axis(theta(),theta(),,)title('平衡力矩')gridonfigure()plotyy(theta,Ekk,theta,SE)xlabel('Theta,时间t,')ylabel('Fc')title('导杆、连杆和刨头的总动能')gridontheta()theta()得出的结果图像如下:

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/10

机械原理 牛头刨床附录MATLAB编程部分

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利