%for k = 1:2
for k = 1:401
i = k - 201 ;
  tk = i / 100.0 ;
  t(k) = tk ;
  y(k) = tk^2 ;
end

for k = 1:10
  xk = 1 + ( 2.0 ^ ( - k ) ) ;
x(k) = xk ;
f(k) = xk * xk ;
end

plot(t,y), axis([-2.0,2.0,-0.2,3.0])
hold on
plot(x,f,'--ro', 'MarkerFaceColor','g' ), axis([-2.0,2.0,-0.2,3.0])
hold off

print -depsc eps/l22
