用matlab模拟机械运动

机械原理第八版课后习题8-16
main.m

%% 公共汽车门开闭仿真
clear;clc;
%% 变量定义
x_A = 0; y_A = 0;
L_DE = sqrt(400^2-50^2);
L_AB = 420;
A = [x_A,y_A];
a = 0:0.1:90/57.3;
E_locus = zeros(length(a),2);
D_locus = zeros(length(a),2);
figure(1)
% plot([-800,850],[-110,-110],'r-')
pit_num = 1;
f_n = 'textimage.gif';
%% 更新点坐标'
L_BC = 400;
% syms x y k b x1 y1 x2 y2
z = 1;
for alpha = aB(1) = L_AB*cos(alpha); B(2) = -L_AB*sin(alpha);syms x y[x,y] = solve(y+110,(x-B(1))^2+(y-B(2))^2-L_BC^2);answer = vpa([x,y],9);answer = double(answer(2,:));C(1) = answer(1); C(2) = answer(2);syms k b[b,k] = solve(abs(B(2)-k*B(1)-b)==50*sqrt(k^2+1),abs(C(2)-k*C(1)-b)==160*sqrt(k^2+1));s = double(k);b0 = double(b);syms x1 y1[x1,y1] = solve(y1-s*x1-b0,y1-B(2)+(1/s)*x1-(1/s)*B(1));x1 = double(x1);y1 = double(y1);D(1) = x1;D(2) = y1;D_locus(z,1) = x1; D_locus(z,2) = y1;syms x2 y2[x2,y2] = solve(y2-s*x2-b0,y2-C(2)+(1/s)*x2-(1/s)*C(1));x2 = double(x2);y2 = double(y2);E(1) = x2;E(2) = y2;E_locus(z,1) = x2; E_locus(z,2) = y2;hold offpause(0.01)drawlineinthefigure(A,B)drawlineinthefigure(B,D)drawlineinthefigure(D,E)drawlineinthefigure(E,C)z = z+1;F = getframe(gcf);I = frame2im(F);[I,map] = rgb2ind(I,256);if pit_num == 1imwrite(I,map,f_n,'gif','Loopcount',Inf,'Delaytime',0.2);else imwrite(I,map,f_n,'gif','Writemode','append','Delaytime',0.2);endpit_num = pit_num +1;end
% figure(2)
plot(E_locus(:,1),E_locus(:,2),'linewidth',2)
title('E点的运动轨迹')
% figure(3)
hold on
plot(D_locus(:,1),D_locus(:,2),'linewidth',2)
title('D点的运动轨迹')

drawlineinthefigure.m

function [] = drawlineinthefigure(P1,P2)x(1) = P1(1);x(2) = P2(1);y(1) = P1(2);y(2) = P2(2);plot(x,y,'Linewidth',2)
%     plot([-200,850],[-110,-110],'r--')axis([-200 850 -500 200])hold on

使用matlab绘制的gif图像

用matlab模拟机械运动相关推荐

加加速度matlab,关于加加速度的若干机械运动分析及MATLAB模拟
收稿日期:2004 - 04 - 06 基金项目:遵义师范学院科研基金资助项目(2003012) 作者简介:董水金(1946 -) ,男 ,江苏无锡人 ,遵义师范学院物理系副教授 ,主要从事电子技术和 ...
MATLAB中如何让分度值小点,实验6 干涉的matlab模拟.doc
实验6 干涉的matlab模拟.doc MATLAB在光信息处理中的应用课程上机实验(三峡大学2013年)实验6干涉的MATLAB模拟一.实验目的掌握双缝干涉.牛顿环的MATLAB模拟.二.实验内容1 ...
matlab模拟简单孔径衍射图样,夫琅和费衍射实验文献综述
夫琅和费衍射就是光源和观察幕离障碍物(孔或屏)均为无穷远的衍射现象,又称远场衍射,在实际操作中,可通过一个凸透镜,将无穷远处的衍射图样移至凸透镜的像方焦面上观察.可在观察幕中央看到一条特别明亮的亮条纹 ...
matlab偶极矩电场强度分布图_课程设计用MATLAB模拟偶极子的电场分布.doc
课程设计用MATLAB模拟偶极子的电场分布燕山大学课程设计说明书题目: 用MATLAB模拟偶极子的电场分布学院(系): 年级专业: 学号: 学生姓名: 指导教师: 教师职称: 燕 ...
MATLAB模拟导热过程,一维热传导MATLAB模拟.doc
PAGE 昆明学院 2015 届毕业设计(论文) 设计(论文)题目一维热传导问题的数值解法及其MATLAB模拟子课题题目无姓名伍有超学号 201117030225 所属系物 ...
布丰投针java实现,MATLAB模拟布丰投针实验
MATLAB模拟布丰投针实验标签(空格分隔): 算法 Buffon's Needle 桌面上有距离为a的若干平行线,将长度为L的针随机丢在桌面上,则这根针与平行线相交的概率是多少?假定L < ...
基于Matlab模拟哈特曼波前探测器
哈特曼波前探测器(Shack-Hartmann Wavefront Sensor, SHWFS)[1]用于测量波前像差,本文介绍如何用Matlab模拟SHWFS工作过程,即从像差中获得光点阵图像.计算 ...
MATLAB模拟陀螺仪的运动轨迹（附完整代码）
本文讲述了陀螺仪运动轨迹的分析过程,并且通过MATLAB进行仿真. 顺时针旋转 MATLAB陀螺仪运动轨迹仿真(正转) 逆时针旋转 MATLAB陀螺仪运动轨迹仿真(反转) 第一步:建立坐标系假设陀螺 ...
matlab磁铁模拟,用matlab 模拟环形磁铁的磁场分布
<用matlab 模拟环形磁铁的磁场分布>由会员分享,可在线阅读,更多相关<用matlab 模拟环形磁铁的磁场分布(10页珍藏版)>请在人人文库网上搜索. 1.MATLAB模拟 ...

用matlab模拟机械运动

用matlab模拟机械运动相关推荐

最新文章

热门文章