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