#====================
# Figure 1.1
#====================
t=0:10
n=1000*(1+0.05)^t
plot(t,n,type="l")