Create a script in octave to perform what is given in the problem:

Consider a loan whose initial value is A, interest rate per annum r, and amount of monthly payment P. The amount remaining after n months is determined by 12P B = A(1+1a)" + )" - 12" [(1+2)" - 1] If PHP 50,000 was loaned with a 5% interest per year, how long will the loan extinguish if PHP 1,000 is paid monthly? Solve this problem by creating a script that does the following. 1. Define the parameters A, r and P. 2. Create the time-base from n = 0 up to n = 100. 3. Compute the unpaid amount remaining using the formula above. 4. Using the stem function, plot B as a function of n. Save the script as calcloan.m. From the graph, read off the value of n where B becomes zero or less. That gives off the number of months to completely close the loan. Repeat the problem when the loaned amount is PHP 100,000