HOW do I a nonlinear regression of the Michaelis-Menten Formulea?

classic Classic list List threaded Threaded
4 messages Options
Reply | Threaded
Open this post in threaded view
|

HOW do I a nonlinear regression of the Michaelis-Menten Formulea?

wschrabi
Hi
I could do a successfull fitting of the Michaelis-Menten Formulea in Mathematica 10.4.1. Now I would like to know if this also could be done with SPSS 23. THE main Problem is that I have a 3dimensional dependent variable of the model. The solution should be the regression (such as standard-error and confidence intervalls ) of the other 3 optimized system parameters. Here a screenshoot of the MMA solution:
MMA solution

Thanks a lot in advanced.
Walter
Reply | Threaded
Open this post in threaded view
|

Re: HOW do I a nonlinear regression of the Michaelis-Menten Formulea?

wschrabi
SOrry, but the IMAGE is too small. Here once more bigger.
Reply | Threaded
Open this post in threaded view
|

Re: HOW do I a nonlinear regression of the Michaelis-Menten Formulea?

wschrabi
wschrabi wrote
SOrry, but the IMAGE is too small. Here the souce as text:
s1 = {{1, 333, 7, 0.0164}, {1, 333, 14, 0.0316}, {1, 333, 26,
    0.0528}, {1, 333, 49, 0.0923}, {1, 333, 75, 0.1404}, {1, 333, 117,
     0.2137}, {1, 333, 1052, 0.9834}};
s2 = {{2, 166.7, 8, 0.0350}, {2, 166.7, 16, 0.0636}, {2, 166.7, 28,
    0.108}, {2, 166.7, 52, 0.198}, {2, 166.7, 82, 0.3000}, {2, 166.7,
    103, 0.378}};
s3 = {{3, 83, 49.5, 0.352}, {3, 83, 90, 0.575}, {3, 83, 125,
    0.690}, {3, 83, 151, 0.766}, {3, 83, 208, 0.900}};
s4 = {{4, 41.6, 10.25, 0.1147}, {4, 41.6, 30.75, 0.3722}, {4, 41.6,
    61.75, 0.615}, {4, 41.6, 90.75, 0.747}, {4, 41.6, 112.7,
    0.85}, {4, 41.6, 132.7, 0.925}, {4, 41.6, 154.7, 0.940}};
s5 = {{5, 20.8, 17, 0.331}, {5, 20.8, 27, 0.452}, {5, 20.8, 38,
    0.611}, {5, 20.8, 62, 0.736}, {5, 20.8, 95, 0.86}, {5, 20.8, 1372,
     0.99}};
alldata0 = Join[s1, s2, s3, s4, s5];

model = Sum[
   KroneckerDelta[
     x1 - i]*(S0 - ((1 + (S0)/Kp)/(1/Ks - 1/Kp))*
        ProductLog[
         S0/((1 + (S0)/Kp)/(1/Ks - 1/Kp))*
          Exp[(S0 - V/(1 - Ks/Kp)*t)/((1 + (S0)/Kp)/(1/Ks - 1/Kp))]])/
     S0, {i, 5}];

sol = NonlinearModelFit[alldata,
   model, {{Ks, 20}, {Kp, 40}, {V, 0.50}}, {x1, S0, t}];
Reply | Threaded
Open this post in threaded view
|

Re: HOW do I a nonlinear regression of the Michaelis-Menten Formulea?

wschrabi
The Results :