All other sens_.*() functions I looked at return the typical parameters (e.g., shapes for Beta, shape and scale for Gamma). I think the skewnorm function should return the location parameter instead of the mean.
|
original_mean <- mean + sd * (shape / sqrt(1 + shape^2)) * sqrt(2 / pi) |
|
new_mean <- mean + new_sd * (shape / sqrt(1 + shape^2)) * sqrt(2 / pi) |
|
diff_means <- new_mean - original_mean |
|
adjusted_mean <- mean - diff_means |
|
return(list(mean = adjusted_mean, sd = new_sd, shape = shape)) |
All other
sens_.*()functions I looked at return the typical parameters (e.g., shapes for Beta, shape and scale for Gamma). I think the skewnorm function should return the location parameter instead of the mean.extras/R/sens.R
Lines 77 to 81 in 48d69df