subplot(3,1,1)
hold on
axis equal
axis([0,7.0, -1,1])
plot([0,7.0],[0,0],':k')
plot([pi/3,2*pi/3,pi,4*pi/3,5*pi/3,2*pi], ...
[cos(0*pi/3),cos(0*2*pi/3),cos(0*pi),cos(0*4*pi/3),cos(0*5*pi/3),1], '^b')
fplot('cos(0*v)',[0,2*pi],'k')
for (i=1:6)
   plot([i*pi/3,i*pi/3],[0,cos(0*i*pi/3)],'--r')
end
title('Vector v_{1}')

subplot(3,1,2)
hold on
axis equal
axis([0,7.0, -1,1])
plot([0,7.0],[0,0],':k')
plot([pi/3,2*pi/3,pi,4*pi/3,5*pi/3,2*pi], ...
[cos(1*pi/3),cos(1*2*pi/3),cos(pi),cos(1*4*pi/3),cos(1*5*pi/3),1], 'b^')
fplot('cos(1*v)',[0,2*pi],'k')
for (i=1:6)
  plot([i*pi/3,i*pi/3],[0,cos(1*i*pi/3)],'--r')
end
title('Vector v_{2}')

subplot(3,1,3)
hold on
axis equal
axis([0,7.0, -1,1])
plot([0,7.0],[0,0],':k')
plot([pi/3,2*pi/3,pi,4*pi/3,5*pi/3,2*pi], ...
[sin(1*pi/3),sin(1*2*pi/3),sin(2*pi),sin(1*4*pi/3),sin(1*5*pi/3),0], '^b')
fplot('sin(1*v)',[0,2*pi],'k')
for (i=1:6)
   plot([i*pi/3,i*pi/3],[0,sin(1*i*pi/3)],'--r')
end
title('Vector v_{3}')

