Prints a summary of the exposure analysis results.
Usage
# S3 method for class 'exposure'
print(x, ...)See also
Other Repairable Systems Analysis:
exposure(),
mcf(),
nhpp(),
overlay_nhpp(),
plot.exposure(),
plot.mcf(),
plot.nhpp(),
plot.nhpp_predict(),
predict_nhpp(),
print.mcf(),
print.nhpp(),
print.nhpp_predict()
Examples
id <- c(1, 1, 2, 2)
time <- c(100, 200, 150, 300)
result <- exposure(id, time)
print(result)
#> Exposure Analysis for Repairable Systems
#> -----------------------------------------
#> Number of systems: 2
#> Total events: 4
#> Total exposure: 500.00
#> Overall event rate: 0.008000
#>
#> Time At Risk Cum. Exposure Cum. Events Event Rate
#> 100 2 200 1 0.005000
#> 150 2 300 2 0.006667
#> 200 2 400 3 0.007500
#> 300 1 500 4 0.008000