Hexazinone <- c(0.000000001, 0.5, 2.7, 11)
#Hexazinone is used as its species sensitivity distribution plots fits Inverse Weibull
Inverse_Weibull_Formula(concentration = Hexazinone,
shape_location = pesticide_info$shape_location[pesticide_info$pesticide == "Hexazinone"],
scale = pesticide_info$scale[pesticide_info$pesticide == "Hexazinone"])
Run the code above in your browser using DataLab