Non Linear, Regression, R, Modelling.
make sure I translated it correctly in R. formulaExp<-as.formula(y~P*(I(1-(exp(-(Ks*x))))^B)*(Ka*((exp(-(Ke*x)))-(exp(-(Ka*x))))/(Ka-Ke))) f1<-function(x, P, Ks,B, Ka, Ke){ P*(I(1-(exp(-(Ks*x))))^B)*(Ka*((exp(-(Ke*x)))-(exp(-(Ka*x))))/(Ka-Ke))} f1(20, P=2.48, Ks=0.014, B=1.52, Ka=0.00059,