if (FALSE) {
# A fixed lognormal distribution with sd 5 and sd 1.
dist1 <- LogNormal(mean = 5, sd = 1, max = 20)
sd(dist1)
# A gamma distribution with mean 3 and sd 2
dist2 <- Gamma(mean = 3, sd = 2)
sd(dist2)
# The sd of the sum of two distributions
sd(dist1 + dist2)
}
Run the code above in your browser using DataLab