A R package shiny to implement Bayes' theorem on trigger value of the toxicant value