% Siple parametric plot example
% Can rotate the plot
% Minas Spetsakis, 2018

phi = linspace(0,2*pi,100);
X   = cos(phi)*4;
Y   = sin(phi*2)*1;
plot(X,Y);

delta = 25;
XY = [X;Y];
R = [cosd(delta), -sind(delta);sind(delta),cosd(delta)];

hold on;
XY = R*XY;
plot(XY(1,:),XY(2,:));

XY = R*XY;
plot(XY(1,:),XY(2,:));

XY = R*XY;
plot(XY(1,:),XY(2,:));

XY = R*XY;
plot(XY(1,:),XY(2,:));
hold off;
daspect([1 1 1]);
