diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2014-05-07 14:47:28 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2014-05-07 14:47:28 +0200 |
commit | e959fde98f95f3595e01490b67892678bbcd1b27 (patch) | |
tree | 992c56223a31c6937091dd5f9eeef63c2dd9e579 /R/SFORB.solution.R | |
parent | d846ac7691ab648afbb5a98bbca91911396a95bf (diff) |
Fork the gmkin GUI from mkin. See ChangeLog for details
Diffstat (limited to 'R/SFORB.solution.R')
-rw-r--r-- | R/SFORB.solution.R | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/R/SFORB.solution.R b/R/SFORB.solution.R deleted file mode 100644 index 45a4533..0000000 --- a/R/SFORB.solution.R +++ /dev/null @@ -1,9 +0,0 @@ -SFORB.solution = function(t, parent.0, k_12, k_21, k_1output) {
- sqrt_exp = sqrt(1/4 * (k_12 + k_21 + k_1output)^2 + k_12 * k_21 - (k_12 + k_1output) * k_21)
- b1 = 0.5 * (k_12 + k_21 + k_1output) + sqrt_exp
- b2 = 0.5 * (k_12 + k_21 + k_1output) - sqrt_exp
-
- parent = parent.0 *
- (((k_12 + k_21 - b1)/(b2 - b1)) * exp(-b1 * t) +
- ((k_12 + k_21 - b2)/(b1 - b2)) * exp(-b2 * t))
-}
|