Dear all,
I need to calculate confidence intervals of a and b and root mean square
error (RMSE) of a power law given by
Y = a X^b
I calculate the confidence intervals by:
reg.ln = function(tab.xy, indices){
tab.xy = storage[indices,]
res.lm = lm(log(y)~log(x), data=tab.xy)
coefficients(res.lm)
}
xy.boot = boot(tab.xy, reg.ln, 2000)
boot.ci(xy.boot)
where tab.xy is a dataframe containing x and y.
Is there any way to calculate the mean RMSE of the 2000 fitted models,
e.g. identify the data which are not used in the random sub-sample
generated by boot() and calculate the RMSE of the fitted models.
Kind regards for any help
Thomas
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.