clear
B(1)=1000;
rate = 0.15;
for i = [1:19]
   B(i+1) = B(i)+rate*B(i);
end
figure(1)
plot(B,'-*b')
title('Band Account Balance',...
    'FontName','Arial',...
    'FontSize',12,...
    'FontWeight','Bold')

xlabel('Years')
ylabel('Dollars in account')

xlim([1 21])
ylim([1000 16000]) 

text(4,8000,'Rate= 15%',...
    'FontName','Arial',...
    'FontSize',14)