Week 2- 2R Robotic Arm Challenge

https://youtu.be/4ji3IBqx2QM

this is the youtube link of anmation file.

i have taken 2 arms of robot ,one is 1 and another is 0.5.I varies the value of theta 1& theta 2.i have 3 position which are [x0 y0],[x1 y1],[x2 y2].Then i use for loop.value of THETA1&THETA2 change with respect of theta1(i)&theta2(J).i&j are nothing but the values of theta1&theta2.

Hence we get many frame and i add everyone to creat a video file M.

i have got error again and again in "videowriter"line.it shows this is a unrecognized function.then i type as "VideoWriter".then it is ok.

close all
clear all
clc

ct=1;

%inputs
l1=1;
l2=0.5;

theta1=linspace(0,90,10);
theta2=linspace(0,90,10);
for i=1:length(theta1)
    THETA1=theta1(i);

    for j=1:length(theta2)
    THETA2=theta2(j);

%coordinates
 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);
axis([-0.1 1.5 0 1.5])
pause(.003)
M(ct)=getframe(gcf);
ct=ct+1;

    end
end
movie(M)
Videofile=VideoWriter('foroward_kinematics.avi','uncompressed AVI');
open(Videofile)
writeVideo(Videofile,M)
close(Videofile)