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