作業11(改)

11.1本人本週(5/24)有來上課
11.2
某凸輪開始時先在0-100∘區間滯留，然後提升後在200至260∘區間滯留，其高度（衝程）為5公分，其餘l由260∘至360∘則為返程。升程採用等加速度運動，返程之運動型式自定。設刻度區間為10∘，試繪出其高度、速度及加速度與凸輪迴轉角度間之關係。
先設置一程式:plot_dwell.m
function plot_dwell(ctheta,s,pattern,range)
figure(1);clf;
[y,yy,yyy]=dwell(ctheta,range,pattern)
h1=plot(ctheta,y*s,'b-',ctheta,yy*s,'k-',ctheta,yyy*s,'r-')
legend('Displacement','Velocity','Acceleration',3)
xlabel('Elapsed Angle, degrees')
grid
執行
plot_dwell(0:10:360,5,[2 1],[100 200 260]);
升程:等加速運動
回程:等速運動
圖示:

11.3
設凸輪之半徑為15公分，以順時針方向旋轉，其從動件為梢型，垂直接觸，長為10公分，從動件之運動係依照第二項之運動型式。試繪出此凸輪之工作曲線。
先設置一程式:P8_11.m
function [theta,y]=P8_11(theta,limit0,s)
d2r=pi/180;
h=s;lm=limit0*d2r;
lm=[lm(1) (lm(1)+lm(2))/2 lm(2) lm(3) (lm(3)+lm(4))/2 lm(4)]/d2r;
LM=lm*d2r;
th=theta*d2r;
y=ones(size(th));
y(thy(th>=LM(3))=h;
y(th>=LM(1)&th=LM(1)&thy(th>=LM(2)&th=LM(2)&thy(th>=LM(4)&th=LM(4)&thy(th>=LM(5)&th<=LM(6))=2*h*(1-(th(th>=LM(5)&th<=LM(6))-LM(4))/(LM(6)-LM(4))).^2;
plot(th/d2r,y);
xlabel('Theta in degrees');
ylabel('Follower displacement');
grid on;
執行
P8_11([0:10:360],[100 200 260 360],10)
工作曲線圖示:

11.4
你能讓此凸輪迴轉嗎？
能
圖示: