getRiskParamsScenarios method

Get a list containing all risk paramaters for a Scenarios object.

Examples

scenarios1 <- new("Scenarios")
scenarios1 <- setParamsBaseScenarios(scenarios1, horizon=5, nScenarios=10)
scenarios1 <- scenarios1 <- setRiskParamsScenarios(scenarios1, vol=.1, k=2,volStock=.2,
volRealEstate=.15, volDefault=.2, alpha=.1,beta=1, eta=.05,rho=.5, stock0=100,realEstate0=50,
liquiditySpread0=.01, defaultSpread0=.01)
getRiskParamsScenarios(scenarios1)
#> $vol
#> [1] 0.1
#> 
#> $k
#> [1] 2
#> 
#> $volStock
#> [1] 0.2
#> 
#> $volRealEstate
#> [1] 0.15
#> 
#> $volDefault
#> [1] 0.2
#> 
#> $alpha
#> [1] 0.1
#> 
#> $beta
#> [1] 1
#> 
#> $eta
#> [1] 0.05
#> 
#> $rho
#> [1] 0.5
#> 
#> $stock0
#> [1] 100
#> 
#> $realEstate0
#> [1] 50
#> 
#> $liquiditySpread0
#> [1] 0.01
#> 
#> $defaultSpread0
#> [1] 0.01
#>