# 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)
lamvec = c(0.5,0.7,0.9)
bounds.corr.GSC.NNP(lamvec,pmat)
# }
Run the code above in your browser using DataLab