
Last chance! 50% off unlimited learning
Sale ends in
# Reliability data preparation:
## Data for mixture model:
data_mix <- reliability_data(
voltage,
x = hours,
status = status
)
# Example 1 - EM algorithm with k = 2:
mix_mod_em <- mixmod_em(
x = data_mix,
conf_level = 0.95,
k = 2,
n_iter = 150
)
# Example 2 - Maximum likelihood is applied when k = 1:
mix_mod_em_2 <- mixmod_em(
x = data_mix,
conf_level = 0.95,
k = 1,
n_iter = 150
)
Run the code above in your browser using DataLab