# Evidences (aka marginal likelihoods) can be very small
evidences <- c(0.0001, 0.0002, 0.0003, 0.0004)
# Sum will be 1.0
calc_weights(evidences)
beastier::remove_beaustier_folders()
beastier::check_empty_beaustier_folders()
Run the code above in your browser using DataLab