data(edhec)
chart.BarVaR(edhec[,"Funds.of.Funds",drop=FALSE], main="Monthly Returns")
chart.BarVaR(edhec[,"Funds.of.Funds",drop=FALSE], main="Monthly Returns", method="VaR")
chart.BarVaR(edhec[,"Funds.of.Funds",drop=FALSE], main="Monthly Returns", method="StdDev", n=36)
Run the code above in your browser using DataLab