Displaying 1 result from an estimated 1 matches for "modelss".
Did you mean:
models
2009 Oct 17
1
custom selfStart model works with getInitial but not nls
...##Estimate aNVal based on final value
aNVal = aLVal*T2/B0;
values = list(aLVal, aNVal, T0);
names(values) <- mCall[c("aL", "aN", "T0")]; #mimic syntax used by P&B
return(values)
}
##Now create new model with selfStart attributes
const.PBMC.tcell.modelSS<- selfStart(model = const.PBMC.tcell.model,
initial=const.PBMC.tcell.selfStart)
##Test routines using getInitial -- This works
> getInitial(Count ~ const.PBMC.tcell.modelSS(B0, Time,aL, aN, T0), data =
> tissueData)
[1] 0.05720924
$aL
[1] 0.05720924
$aN
[1] 0.1981895
$T0
[1] 1360.29...