Displaying 1 result from an estimated 1 matches for "hatac".
Did you mean:
hata
2012 Apr 16
0
automatically scan multiple starting values
...and a copy of the values of
my data file.
plot(FR~N0,main="Rogers III")
RogersIII <-
nls(FR~N0*(1-exp(((v+w*FR)/(1+x*FR))*(Th3*FR-24))),start=list(v=0.002,w=0.00075,x=-0.1,Th3=2.5),control=list(maxiter=1000000,minFactor=0.0000000000000000000000000000000000001))
# 24 is tijd in uren
hatac <- predict(RogersIII)
lines(spline(N0,hatac))
summary(RogersIII)
N0 FR
5 4
3 2
5 3
5 4
6 4
5 4
4 2
5 4
6 5
5 3
10 5
14 7
12 6
17 9
10 4
16 8
15 8
14 5
15 6
15 5
19 10
20...