# A fixed lognormal distribution with mean 5 and sd 1.
dist1 <- LogNormal(
meanlog = 1.6, sdlog = 1, max = 20
)
dist1 + dist1
# An uncertain gamma distribution with shape and rate normally distributed
# as Normal(3, 0.5) and Normal(2, 0.5) respectively
dist2 <- Gamma(
shape = Normal(3, 0.5),
rate = Normal(2, 0.5),
max = 20
)
dist1 + dist2
Run the code above in your browser using DataLab