data(Canada)
var.2c <- VAR(Canada, p = 2, type = "const")
## ARCH test
archtest <- arch(var.2c)
plot(archtest)
## Normality test
normalitytest <- normality(var.2c)
plot(normalitytest)
## serial correlation test
serialtest <- serial(var.2c)
plot(serialtest)
Run the code above in your browser using DataLab