Description Usage Arguments Examples
Title
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | mcf.diff.plot(
data1.rdu,
data2.rdu,
conf.level = GetSMRDDefault("SMRD.ConfLevel")/100,
plot.data = F,
title.option = GetSMRDDefault("SMRD.TitleOption"),
my.title = NULL,
xlab = paste("Time in", get.time.units(data1.rdu)),
ylab = "Difference in Mean Cumulative Failures",
plot.seg = T,
lty = 1,
xlim = c(NA, NA),
ylim = c(NA, NA),
band.type = "p"
)
|
data1.rdu |
|
data2.rdu |
|
conf.level |
|
plot.data |
|
title.option |
|
my.title |
|
xlab |
|
ylab |
|
plot.seg |
|
lty |
|
xlim |
|
ylim |
|
band.type |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 | ## Not run:
Grids1.rdu <- frame.to.rdu(grids1,
ID.column = "unit",
time.column = "days",
event.column = "event",
data.title = "Grids1 Replacement Data",
time.units = "Days")
summary(Grids1.rdu)
event.plot(Grids1.rdu)
print(mcf(Grids1.rdu))
mcf.plot(Grids1.rdu)
Grids2.rdu <- frame.to.rdu(grids2,
time.column = c(2),
event.column = 3,
ID.column = 1,
data.title = "Grids2 Replacement Data",
time.units ="Days")
summary(Grids2.rdu)
#attr(Grids2.rdu,"WindowInfo")
PlotMCFandNHPP(Grids2.rdu,
form = "power rule")
Grids2.mcf <- mcf(Grids2.rdu)
plot(Grids2.mcf)
event.plot(Grids2.rdu)
print(mcf(Grids2.rdu))
mcf.plot(Grids2.rdu)
mcf.diff.plot(Grids1.rdu,
Grids2.rdu,
plot.seg = T,
xlab = "Locomotive Age in Days",
ylab = "Difference in Mean Cumulative Replacements")
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.