Some cosmetic changes, and the vignette created during package building.

git-svn-id: http://kriemhild.uft.uni-bremen.de/svn/chemCal@17 5fad18fb-23f0-0310-ab10-e59a3bee62b4

1 files changed, 9 insertions, 9 deletions

diff --git a/man/inverse.predict.Rd b/man/inverse.predict.Rd
index 925f3e9..6bea72c 100644
--- a/man/inverse.predict.Rd
+++ b/man/inverse.predict.Rd
@@ -59,15 +59,15 @@
   p. 200
 }
 \examples{
-  data(massart97ex3)
-  attach(massart97ex3)
-  yx <- split(y, x)
-  ybar <- sapply(yx, mean)
-  s <- round(sapply(yx, sd), digits = 2)
-  w <- round(1 / (s^2), digits = 3)
-  weights <- w[factor(x)]
-  m <- lm(y ~ x, w = weights)
+data(massart97ex3)
+attach(massart97ex3)
+yx <- split(y, x)
+ybar <- sapply(yx, mean)
+s <- round(sapply(yx, sd), digits = 2)
+w <- round(1 / (s^2), digits = 3)
+weights <- w[factor(x)]
+m <- lm(y ~ x, w = weights)
 
-  inverse.predict(m, 15, ws = 1.67) # 5.9 +- 2.5
+inverse.predict(m, 15, ws = 1.67) # 5.9 +- 2.5
 }
 \keyword{manip}