# NOT RUN {
# Example 1: Weibull-Grid:
x_layout <- seq(1e-5, 1e+07, length.out = 10)
grid_weibull <- plot_layout(x = x_layout,
distribution = "weibull",
title_main = "Weibull Analysis",
title_x = "Time to Failure",
title_y = "Failure Probability in %")
# Example 2: Grid of Normal Distribution:
x_layout <- seq(1, 10, length.out = 10)
grid_normal <- plot_layout(x = x_layout,
distribution = "normal",
title_main = "Normal Grid",
title_x = "Time to Event",
title_y = "Failure Probability in %")
# }
Run the code above in your browser using DataLab