From 23f10d1ec147873bf9f198b47c1c9d9310b6591d Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Fri, 16 Apr 2021 14:27:40 +0200 Subject: Prepare upload to retain presence on CRAN As knitr does not depend on markdown any more --- vignettes/chemCal.R | 23 ----------------------- 1 file changed, 23 deletions(-) delete mode 100644 vignettes/chemCal.R (limited to 'vignettes') diff --git a/vignettes/chemCal.R b/vignettes/chemCal.R deleted file mode 100644 index d9015e9..0000000 --- a/vignettes/chemCal.R +++ /dev/null @@ -1,23 +0,0 @@ -## ------------------------------------------------------------------------ -library(chemCal) -m0 <- lm(y ~ x, data = massart97ex3) -calplot(m0) - -## ------------------------------------------------------------------------ -plot(m0, which=3) - -## ---- message = FALSE, echo = TRUE--------------------------------------- -weights <- with(massart97ex3, { - yx <- split(y, x) - ybar <- sapply(yx, mean) - s <- round(sapply(yx, sd), digits = 2) - w <- round(1 / (s^2), digits = 3) -}) -massart97ex3.means <- aggregate(y ~ x, massart97ex3, mean) - -m <- lm(y ~ x, w = weights, data = massart97ex3.means) - -## ------------------------------------------------------------------------ -inverse.predict(m, 15, ws=1.67) -inverse.predict(m, 90, ws = 0.145) - -- cgit v1.2.1