function sinwaves
X=0:0.01:20;
f = 5.25;
P = 1/f;
w = 2*pi*f;
v = 10;
k = w/v;
A = 1;
R = A*exp((1i*k)*X);
dt = P/8;
iw = -1i*w;
pause on
for n=1:1000
    t = n*dt;
    T = exp(iw*t);
    Y = real(R.*T);
    plot(X,Y)
    axis image
    axis off
    pause(0.1)
end;
pause off