r_squared_profiling function

R-Squared-Profile Function for Parametric Lifetime Distributions with Threshold