if (FALSE) {
XX <- diff(log(EuStockMarkets)[100:200,]) * 100
one.weight <- foreca.EM.one_weightvector(whiten(XX)$U,
spectrum.control =
list(method = "mvspec"))
}
Run the code above in your browser using DataLab