Graphics Programs Reference
In-Depth Information
plot(ax3,ay3,'g');
M3(ii) = getframe;
end
grid
xlabel('Ex')
ylabel('Ey')
title('Electric Field Locus; case 2')
rho = sqrt(ax3.^2 + ay3.^2);
major_axis = 2*max(rho);
minor_axis = 2*min(rho);
aspect3 = 10*log10(major_axis/minor_axis)
alpha3 = (180/pi) * atan2(ay3(1),ax3(1))
% Case 3
ax4 = cos(wct);
ay4 = cos(wct+(pi/6));
M4 = moviein(N);
figure(4)
axis image
hold on
for ii = 1:N
plot(ax4(ii),ay4(ii),'>r');
line([xc ax4(ii)],[yc ay4(ii)]);
plot(ax4,ay4,'g')
M4(ii) = getframe;
end
grid
xlabel('Ex')
ylabel('Ey')
title('Electric Field Locus; case 3')
rho = sqrt(ax4.^2 + ay4.^2);
major_axis = 2*max(rho);
minor_axis = 2*min(rho);
aspect4 = 10*log10(major_axis/minor_axis)
alpha4 = (180/pi) * atan2(ay4(1),ax4(1))
end
% Case 4
ax6 = cos(wct);
ay6 = sqrt(3) .* cos(wct+(pi/3));
M6 = moviein(N);
figure(6)
axis image
hold on
for ii = 1:N
Search WWH ::
Custom Search