# NOT RUN {
output <- Futures.Price.Simulate(X.0 = c(log(SS.Oil$Spot[1,1]), 0),
parameters = SS.Oil$Two.Factor,
dt = SS.Oil$dt,
N.obs = nrow(SS.Oil$Stitched.Futures),
TTM = SS.Oil$Stitched.TTM)
## ->
output <- futures_price_simulate(x_0 = c(log(SS_oil$spot[1,1]), 0),
parameters = SS_oil$two_factor,
dt = SS_oil$dt,
N_obs = nrow(SS_oil$stitched_futures),
futures_TTM = SS_oil$stitched_TTM)
# }
Run the code above in your browser using DataLab