powered by
PCAVaRPlot(Ra, position.data)
# Computes PCA VaR Ra <- matrix(rnorm(15*20),15,20) position.data <- rnorm(20) PCAVaRPlot(Ra, position.data)
Run the code above in your browser using DataLab