#' # A fixed lognormal distribution with mean 5 and sd 1.
dist1 <- LogNormal(mean = 1.5, sd = 0.5, max = 20)
print(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
)
print(dist2)
Run the code above in your browser using DataLab