Added prop.thres function to imptools.R