Displaying 1 result from an estimated 1 matches for "tp4310752p4312661".
2012 Jan 19
3
fitting an exp model
Hello there,
I am trying to fit an exponential model using nls to some data.
#data
t <- c(0,15,30,60,90,120,240,360,480)
var <- c(0.36,9.72,15.50,23.50,31.44,40.66,59.81,73.11,81.65)
df <- data.frame(t, var)
# model
# var ~ a+b*(1-exp(-k*t))
# I'm looking for values of a,b and k
# formula
# mod <- nls(formula = var ~ a+b *(1-exp((-k)*t)), start=list(a=0, b=10,