# NOT RUN {
set.seed(42)
WN <- matrix(stats::rnorm(200), nrow = 100, ncol = 2)
# }
# NOT RUN {
MVWNtest_stats <- MVWNtest(x = WN, maxlag = 10, printResults = 1)
# }
# NOT RUN {
x <- FracDiff(x = WN, d = - 0.5)
# }
# NOT RUN {
MVWNtest_stats <- MVWNtest(x = x, maxlag = 10, printResults = 1)
# }
# NOT RUN {
WN_x_d <- FracDiff(x, d = 0.5)
# }
# NOT RUN {
MVWNtest_stats <- MVWNtest(x = WN_x_d, maxlag = 10, printResults = 1)
# }
Run the code above in your browser using DataLab