version 7.3-40

cran · Mar 21, 2015 · c157e9d · c157e9d
1 parent 395f25c
commit c157e9d
Show file tree

Hide file tree

Showing 4 changed files with 17 additions and 21 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: MASS
 Priority: recommended
-Version: 7.3-39
-Date: 2015-02-01
-Revision: $Rev: 3429 $
+Version: 7.3-40
+Date: 2015-03-21
+Revision: $Rev: 3441 $
 Depends: R (>= 3.1.0), grDevices, graphics, stats, utils
 Suggests: lattice, nlme, nnet, survival
 Authors@R: c(person("Brian", "Ripley", role = c("aut", "cre", "cph"),
@@ -21,14 +21,14 @@ LazyData: yes
 ByteCompile: yes
 License: GPL-2 | GPL-3
 URL: http://www.stats.ox.ac.uk/pub/MASS4/
-Packaged: 2015-02-20 08:29:38 UTC; ripley
+NeedsCompilation: yes
+Packaged: 2015-03-21 06:59:04 UTC; ripley
 Author: Brian Ripley [aut, cre, cph],
   Bill Venables [ctb],
   Douglas M. Bates [ctb],
   Kurt Hornik [trl] (partial port ca 1998),
   Albrecht Gebhardt [trl] (partial port ca 1998),
   David Firth [ctb]
 Maintainer: Brian Ripley <ripley@stats.ox.ac.uk>
-NeedsCompilation: yes
 Repository: CRAN
-Date/Publication: 2015-02-20 09:31:08
+Date/Publication: 2015-03-21 08:05:55
diff --git a/MD5 b/MD5
@@ -1,4 +1,4 @@
-0abeeffd78e7a390d178d08a33330c11 *DESCRIPTION
+2e4ffd06a54c5b1cd30f6fdfdd4e1da4 *DESCRIPTION
 35aff05a505ecf7e81e0473767794ca9 *INDEX
 f135a040ec910328ae39ccc742bfd6c0 *LICENCE.note
 e925d0e37c94a178fffe16ec2a8724ac *NAMESPACE
@@ -26,7 +26,7 @@ b714f739c6c9dcb33729bb2baa532a0c *R/isoMDS.R
 4cb17b20ccacf80d37cc726736244907 *R/lm.ridge.R
 411b677b9b0b478d204518b50f363332 *R/loglm.R
 a03b55f77943de6230a6e7e61b650c56 *R/logtrans.R
-a15c17f4a4877646f4600fa0d586fa9a *R/lqs.R
+b01a541e4759e37004bea07c7ad10145 *R/lqs.R
 865f29d0ba0995ca13543bf44f391e19 *R/mca.R
 f7d208bdf6bd06e047c5ffff547dac7f *R/misc.R
 c00a7143684b5b3bca4c0d0288259c21 *R/mvrnorm.R
@@ -320,7 +320,7 @@ f7b3d8066e652947494ab6d4fca93b0e *po/R-pl.po
 f3879e5845a77c3e71dd1aed199bf595 *src/MASS.c
 71793e0a75407f348c83f843f572bf0e *src/lqs.c
 7b1360150b8598b576e82534b12345a2 *tests/BankWages.rda
-8954019eca416c195a46a099c2d41d60 *tests/Examples/MASS-Ex.Rout.save
+8f0401c5cf422addc35a9cda9c83bdba *tests/Examples/MASS-Ex.Rout.save
 d87553db40364fdc9c337fa31c009b17 *tests/confint.R
 a0854fee9b36691ca1d0880da31d6f79 *tests/fitdistr.R
 55c6f4de353b9479359459d2718a017e *tests/fitdistr.Rout.save

diff --git a/R/lqs.R b/R/lqs.R
@@ -161,7 +161,7 @@ lqs.default <-
 	    if(abs(s2/scale - 1) < 1e-5) break
 	    scale <- s2
 	}
-	z$coef <- temp$coefficients
+	z$coefficents <- temp$coefficients
 	z$fitted.values <- temp$fitted.values
 	z$residuals <- resid
 	z$scale <- scale

diff --git a/tests/Examples/MASS-Ex.Rout.save b/tests/Examples/MASS-Ex.Rout.save
@@ -1,5 +1,5 @@
 
-R Under development (unstable) (2015-01-04 r67319) -- "Unsuffered Consequences"
+R Under development (unstable) (2015-03-20 r68036) -- "Unsuffered Consequences"
 Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
@@ -591,7 +591,6 @@ Number of Fisher Scoring iterations: 5
 > 
 > # conditional random-effects analysis
 > library(survival)
-Loading required package: splines
 > bacteria$Time <- rep(1, nrow(bacteria))
 > coxph(Surv(Time, unclass(y)) ~ week + strata(ID),
 +       data = bacteria, method = "exact")
@@ -676,7 +675,7 @@ Number of Groups: 50
 > 
 > cleanEx()
 
-detaching ‘package:nlme’, ‘package:survival’, ‘package:splines’
+detaching ‘package:nlme’, ‘package:survival’
 
 > nameEx("bandwidth.nrd")
 > ### * bandwidth.nrd
@@ -1958,7 +1957,6 @@ Number of Fisher Scoring iterations: 7
 > ### ** Examples
 > 
 > library(survival)
-Loading required package: splines
 > gehan.surv <- survfit(Surv(time, cens) ~ treat, data = gehan,
 +      conf.type = "log-log")
 > summary(gehan.surv)
@@ -2070,7 +2068,7 @@ Score (logrank) test = 17.25  on 1 df,   p=3.283e-05
 > 
 > cleanEx()
 
-detaching ‘package:survival’, ‘package:splines’
+detaching ‘package:survival’
 
 > nameEx("ginv")
 > ### * ginv
@@ -3024,7 +3022,6 @@ Proportion of trace:
 > ### ** Examples
 > 
 > library(survival)
-Loading required package: splines
 > plot(survfit(Surv(time) ~ ag, data = leuk), lty = 2:3, col = 2:3)
 > 
 > # now Cox models
@@ -3056,7 +3053,7 @@ Score (logrank) test = 16.49  on 2 df,   p=0.0002629
 > 
 > cleanEx()
 
-detaching ‘package:survival’, ‘package:splines’
+detaching ‘package:survival’
 
 > nameEx("lm.ridge")
 > ### * lm.ridge
@@ -3300,7 +3297,6 @@ Correlations 0.806 0.745  cumulative % explained 26.87 51.71
 > ### ** Examples
 > 
 > library(survival)
-Loading required package: splines
 > plot(survfit(Surv(time, cens) ~ factor(temp), motors), conf.int = FALSE)
 > # fit Weibull model
 > motor.wei <- survreg(Surv(time, cens) ~ temp, motors)
@@ -3370,7 +3366,7 @@ Call: survfit(formula = motor.cox, newdata = data.frame(temp = 130))
 > 
 > cleanEx()
 
-detaching ‘package:survival’, ‘package:splines’
+detaching ‘package:survival’
 
 > nameEx("muscle")
 > ### * muscle
@@ -3460,11 +3456,11 @@ Achieved convergence tolerance: 4.923e-06
      [,1] [,2]
 [1,]   10    3
 [2,]    3    2
-> var(mvrnorm(n=1000, rep(0, 2), Sigma))
+> var(mvrnorm(n = 1000, rep(0, 2), Sigma))
           [,1]     [,2]
 [1,] 10.697849 3.228279
 [2,]  3.228279 2.165271
-> var(mvrnorm(n=1000, rep(0, 2), Sigma, empirical = TRUE))
+> var(mvrnorm(n = 1000, rep(0, 2), Sigma, empirical = TRUE))
      [,1] [,2]
 [1,]   10    3
 [2,]    3    2