# \donttest{
data("gg2018")
dca = ConnectednessApproach(gg2018,
nlag=1,
nfore=10,
window.size=200,
model="VAR",
connectedness="Time")
int = InternalConnectedness(dca, groups=list("US"=c(1,2,3,4), "JP"=c(5,6,7,8)))
# }
Run the code above in your browser using DataLab