Matlab 课程设计李俊机自 091设计题目一:凸轮机构设计已知轮廓为圆形的凸轮(圆的半径为 100mm、偏心距为 20mm),推杆与凸轮运动中心的距离 20mm,滚子半径为 10mm,请利用 matlab 仿真出凸轮推杆的运动轨迹和运动特性(速度,加速度),并利用动画演示出相关轨迹和运动特性
%总程序代码clc;clf;clear;p=figure('position',[1001001200600]);fori=1:360%画圆形凸轮R=100;%圆形凸轮半径A=0:0
006:2*pi;B=i*pi/180;e=20;%偏心距a=e*cos(B);b=e*sin(B);x=R*cos(A)+a;y=R*sin(A)+b;subplot(1,2,1)plot(x,y,'b','LineWidth',3);%填充fill(x,y,'y')axis([-R-e,R+e,-R-e,R+e+100]);set(gca,'Xlim',[-R-e,R+e])set(gca,'Ylim',[-R-e,R+e+100])axisequal;axismanual;axisoff;holdon;plot(a,b,'og')plot(e,0,'or')plot(0,0,'or','LineWidth',3)%画滚gcx=0%滚子中心 X 坐r=10%滚子半gcy=sqrt((R+r 厂 2-a"2)+b;%滚子中心 Y 坐标gx=r*cos(A)%滚子 X 坐gy=r*sin(A)%滚子 Y 坐plot(gx,gy,'b','LineWidth',2);%画其它部分plot([0a],[0b],'k','LineWidth',4)plot([33],[170190],'m','LineWidth',4)plot([-3-3],[170190],'m','LineWidth',4)%画顶杆g