CS计算机代考程序代写 function Lecture20M03()

function Lecture20M03()
clear all;
close all;

%initial guess value of p
p=3;
gp=p-0.1*(p^2-p^3)-10;
dgdp=1-0.1*(2*p-3*p^2);

while abs(gp)>1.0e-13
p=p-gp/dgdp;
gp=p-0.1*(p^2-p^3)-10;
dgdp=1-0.1*(2*p-3*p^2);
end
p