[Sleuth2-commits] r61 - in pkg/Sleuth2: . inst/doc man

[noreply at r-forge.r-project.org]

Author: berwin
Date: 2016-01-02 09:58:26 +0100 (Sat, 02 Jan 2016)
New Revision: 61

Modified:
   pkg/Sleuth2/DESCRIPTION
   pkg/Sleuth2/inst/doc/Sleuth2-manual.pdf
   pkg/Sleuth2/man/case1602.Rd
   pkg/Sleuth2/man/case1902.Rd
   pkg/Sleuth2/man/ex1320.Rd
Log:
Sleuth2:
Minor changes to some help files to satisfy "R CMD check" under
R-devel (2016-01-01 r69832).
Updated inst/doc/Sleuth2-manual.pdf.
Changed DESCRIPTION to depend on R (>= 3.1.0).
Bumped version number.


Modified: pkg/Sleuth2/DESCRIPTION
===================================================================
--- pkg/Sleuth2/DESCRIPTION	2016-01-01 09:12:55 UTC (rev 60)
+++ pkg/Sleuth2/DESCRIPTION	2016-01-02 08:58:26 UTC (rev 61)
@@ -1,7 +1,7 @@
 Package: Sleuth2
 Title: Data Sets from Ramsey and Schafer's "Statistical Sleuth (2nd Ed)"
-Version: 2.0-2
-Date: 2016-01-01
+Version: 2.0-3
+Date: 2016-01-02
 Author:  Original by F.L. Ramsey and D.W. Schafer,
     modifications by Daniel W. Schafer, Jeannie Sifneos and Berwin
     A. Turlach, vignettes contributed by Nicholas Horton, Kate Aloisio
@@ -11,7 +11,7 @@
     ed)", Duxbury. 
 Maintainer: Berwin A Turlach <Berwin.Turlach at gmail.com>
 LazyData: yes
-Depends: R (>= 3.2.0)
+Depends: R (>= 3.1.0)
 Suggests: lattice, knitr, MASS, agricolae, car, gmodels, leaps, mosaic
 VignetteBuilder: knitr
 License: GPL (>= 2)

Modified: pkg/Sleuth2/inst/doc/Sleuth2-manual.pdf
===================================================================
(Binary files differ)

Modified: pkg/Sleuth2/man/case1602.Rd
===================================================================
--- pkg/Sleuth2/man/case1602.Rd	2016-01-01 09:12:55 UTC (rev 60)
+++ pkg/Sleuth2/man/case1602.Rd	2016-01-02 08:58:26 UTC (rev 61)
@@ -43,7 +43,8 @@
      ylab="Total Serum Cholesterol (mg/dl)")
 points(1:20, case1602$Lofiber[ordersubjects], pch=19, col=5)
 points(1:20, case1602$Hifiber[ordersubjects], pch=21, col=3)
-legend(1,245,legend=c("Baseline","After Low Fiber Diet","After High Fiber Diet"),pch=c(24,19,21),col=c(1,5,3))
+legend(1,245,legend=c("Baseline","After Low Fiber Diet","After High Fiber Diet"),
+  pch=c(24,19,21),col=c(1,5,3))
 
 diff <- with(case1602, Hifiber-Lofiber)
 plot(subjects, diff, pch=ifelse(case1602$Order=="HL",19,21))

Modified: pkg/Sleuth2/man/case1902.Rd
===================================================================
--- pkg/Sleuth2/man/case1902.Rd	2016-01-01 09:12:55 UTC (rev 60)
+++ pkg/Sleuth2/man/case1902.Rd	2016-01-02 08:58:26 UTC (rev 61)
@@ -41,7 +41,9 @@
 
 # Add smidgeon to denominator because of zeros
 empiricalodds <- with(case1902, Death/(Nodeath + .5))
-plot(empiricalodds ~ as.numeric(Aggravation), case1902, log="y", pch=ifelse(Victim=="White", 21, 19), xlab="Aggravation Level of the Murder", ylab="Odds of Death Penalty")
+plot(empiricalodds ~ as.numeric(Aggravation), case1902, log="y",
+  pch=ifelse(Victim=="White", 21, 19),
+  xlab="Aggravation Level of the Murder", ylab="Odds of Death Penalty")
 legend(3.8,.02,legend=c("White Victim Murderers","Black Victim Murderers"),pch=c(21,19))
 
 fitbig <- glm(cbind(Death,Nodeath) ~ Aggravation*Victim, case1902, family=binomial)

Modified: pkg/Sleuth2/man/ex1320.Rd
===================================================================
--- pkg/Sleuth2/man/ex1320.Rd	2016-01-01 09:12:55 UTC (rev 60)
+++ pkg/Sleuth2/man/ex1320.Rd	2016-01-02 08:58:26 UTC (rev 61)
@@ -34,8 +34,6 @@
   Mathematics Achievement Items, \emph{Applied Measurement in Education}
   \bold{2}(2): 161--177.
 
-  \url{http://www.act.org/research/reports/pdf/ACT_RR87-16.pdf}
-  
 }
 \examples{
 str(ex1320)