Displaying 1 result from an estimated 1 matches for "nlsdata".
Did you mean:
blsdata
2005 May 26
0
Confidence intervals for prediction based on the logistic equation
...8", "29", "30", "31", "32", "33", "34", "35", "36", "37",
"38", "39", "40", "41", "42"))
#function to bootstrap the model
EC50C <- function (xdata,i) {
nlsdata <- xdata[i,]
Sur.nls <- nls( PCTSurv ~ 100/(100 + exp(( xmid - (LogWBCTEQa) )/scal )
),
data = nlsdata,
start = list( xmid = 0, scal = 1 ),
alg = "plinear", trace = TRUE )
#output xmid, modify to calc EC50 (if PCTS...