# NOT RUN {
pmat = matrix(c(
0.1148643, 1.0899150, -0.1148643, -0.0356926,
-0.0488138, 0.9203374, 0.0488138, 0.0251256,
-0.2107427, 1.0398224, 0.2107427, -0.0293247), nrow=3, byrow=TRUE)
cmat = matrix(c(
1.000, 0.100, 0.354,
0.100, 1.000, 0.386,
0.354, 0.386, 1.000),nrow=3,byrow=TRUE)
intercor.NN(pmat,cmat)
# }
Run the code above in your browser using DataCamp Workspace