Convert a truncated normal distribution to a normal (gaussian) distribution
the truncated normally distributed vector
the minimum of the truncated distribution (calculated from x if not given)
the maximum of the truncated distribution (calculated from x if not given)
the mean of the distribution to return (calculated from x if not given)
the SD of the distribution to return (calculated from x if not given)
a vector with a uniform distribution
x <- truncnorm::rtruncnorm(10000, 1, 7, 3.5, 2)
y <- trunc2norm(x, 1, 7)
g <- ggplot2::ggplot() + ggplot2::geom_point(ggplot2::aes(x, y))
ggExtra::ggMarginal(g, type = "histogram")