Week 2- 2R Robotic Arm Challenge
clear all
close all
clc
%Inputs
l1=1;
l2=0.5;
theta1=linspace(0,90,10); %first link angle having 10 degree interval in between 0 to 90
theta2=linspace(0,90,10); %Second link Angle having 10 degree interval in between 0 to 90
ct=1;
for i=1:length(theta1) %For first link (particular 10 angles)
THETA1 = theta1(i); %Capital THETA1 and THETA2 are variables
for j=1:length(theta2) %For second link (particular 10 angles)
THETA2 = theta2(j);
x0=0;
y0=0;
x1=l1*cosd(THETA1);
y1=l1*sind(THETA1);
x2=x1+l2*cosd(THETA2);
y2=y1+l2*sind(THETA2);
%Plotting
plot([x0 x1],[y0 y1],[x1 x2],[y1 y2],'LineWidth',3) %For each value of theta1 how theta2 changes
axis([-0.1 1.5 0 1.5])
pause(0.03)
M(ct) =getframe(gcf);
ct=ct+1;
end
end
movie(M)
videofile =VideoWriter('forward_kinematics.avi','Uncompressed AVI');
open (videofile)
writeVideo(videofile,M)
close(videofile)
https://drive.google.com/file/d/1OKmL1P0qQ1JbMyttB27_tJPJuzv24iMq/view?usp=sharing
Error in movie function Instead of small letter i used Capital M.I attached the error Scrrenshot