if (FALSE) {
france.fit <- fdm(fr.mort, order = 2)
france.fcast <- forecast(france.fit, 50, method = "ets")
france.sim <- simulate(france.fcast, nsim = 100)
france.fit2 <- coherentfdm(fr.sm)
france.fcast2 <- forecast(france.fit2, 50)
france.sim2 <- simulate(france.fcast2, nsim = 100)
}
Run the code above in your browser using DataLab