# NOT RUN {
# Creating new scenarioRisk.
scenarios <- scenarioRisk(name = c("earthquake",
"real estate crash"),
probability = c(0.001, 0.01),
currency = c("CHF", "CHF"),
effect = c(1000, 10000))
# }
Run the code above in your browser using DataLab