Untitled
a=0.77; b=0.19; c=0.36; budjet=15; %dollari profittomin=0.11*budjet; %dollari % Test sul sistema Algebrico (incognite [X Y] ytest = sysAlg([10 10]); solmin=fsolve(@sysAlg, [10 6]); Xmax=solmin(1); Ymin=solmin(2); solmax=fsolve(@sysAlg, [6 10]); Xmin=solmax(1); Ymax=solmax(2); Xrange=[Xmin Xmax]; Yrange=[Ymin Ymax]; function y=sysAlg(x) a=0.77; b=0.19; c=0.36; budjet=15; %dollari X=x(1); Y=x(2); Ps=a*log(1+b*x(1)); Pw=c*(sqrt(x(2))); y(1)=x(1)+x(2)-budjet; y(2)=0.11*budjet-Ps-Pw; end function y=profitto_tot(X); Y=budjet-X; Ps=a*log(1+b*X); Pw=c*(sqrt(Y)); y=Ps+Pw; end
Leave a Comment