非线性拟合之干物质降解率

评估饲料降解的公式是0rskov and McDonald (1979)提出来的，公式是

dp= a + b (1- e ^(-kd*t))

where dp,a, b,kd were
the ruminal disappearance at time t, the
rapidly soluble fraction, the potentially
degradable fraction, the constant rate of
potentially degradable fraction

本人用R写了一个小程序

#version 1.0  
#author Zhiyuan Ma (mzy1989@126.com) 
library(magrittr)
####an example for mydata
Hours	S1	S2	S4
0	0	11.77521754	10.23590473
4	1.299693422	15.85935953	15.82176361
12	6.758514555	22.04342563	25.32543241
24	38.46467412	41.38519757	34.33597764
36	45.6650358	47.31096819	48.39869438
48	51.94978279	51.82527368	49.33963538
96	63.07196892	60.0723816	58.85545715
120	66.68803506	62.15674649	62.7544118
216	69.09906598	67.83661219	65.73300005
288	71.59815267	67.86700549	66.78234577
##########
mydata <-read.table('clipboard', sep ='\t', stringsAsFactors = FALSE,header=T, check.names = TRUE