The R Project SVN R

Rev

Rev 42333 | Rev 52994 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 42333 Rev 44236
Line 80... Line 80...
80
\author{
80
\author{
81
  Achim Zeileis \email{Achim.Zeileis@R-project.org}
81
  Achim Zeileis \email{Achim.Zeileis@R-project.org}
82
}
82
}
83
\examples{
83
\examples{
84
## NASA space shuttle o-ring failures
84
## NASA space shuttle o-ring failures
85
fail <- factor(c(2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1),
85
fail <- factor(c(2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1,
-
 
86
                 1, 2, 1, 1, 1, 1, 1),
86
               levels = 1:2, labels = c("no", "yes"))
87
               levels = 1:2, labels = c("no", "yes"))
87
temperature <- c(53, 57, 58, 63, 66, 67, 67, 67, 68, 69, 70, 70, 70, 70, 72, 73, 75,
88
temperature <- c(53, 57, 58, 63, 66, 67, 67, 67, 68, 69, 70, 70,
88
                 75, 76, 76, 78, 79, 81)
89
                 70, 70, 72, 73, 75, 75, 76, 76, 78, 79, 81)
89
 
90
 
90
## CD plot
91
## CD plot
91
cdplot(fail ~ temperature)
92
cdplot(fail ~ temperature)
92
cdplot(fail ~ temperature, bw = 2)
93
cdplot(fail ~ temperature, bw = 2)
93
cdplot(fail ~ temperature, bw = "SJ")
94
cdplot(fail ~ temperature, bw = "SJ")