% Graph of sin(1/x)

x1= 0.001:0.000001:0.2;
y1 = sin(1./x1);
x2= -0.2:0.000001:-0.001;
y2 = sin(1./x2);

plot(x1,y1,'k',x2,y2,'k',[-0.2 0.2],[0 0],'k',[0 0],[-1.2 1.2],'k',...
         0.201,0,'k>',0,1.21,'k^')
axis([-0.21 0.21 -1.3 1.3])