portPossCurve(model, riskRange = 2, detail = 100, effFrontier = FALSE, add = FALSE, type = "l", xlab = "Risk", ylab = "Expected Return", doNotPlot = FALSE, ...)"stockModel".X is the portfolio with minimum risk without respect to the risk free rate, then the portfolio possibilities curve will be shown up to approximately the risk riskRange*X.TRUE, only the efficient frontier is drawn.TRUE, the curve is added to a plot. Otherwise a new plot is created."p" for points, "l" for lines, "b" for both lines and points, and "n" to produce no points or lines.add=FALSE.add=FALSE.FALSE, nothing is plotted. This option may be useful if the points along the curve are of interest and only the values returned by portPossCurve are of interest.portPossCurve returns a list of the following items:
R and risk.riskRange. If this is unsuccessful in producing a plot to the detail desired, increase the detail. Generally it is advisable to attempt to adjust the riskRange before adjusting detail.
stockModel, portClouddata(stock94)
sm <- stockModel(stock94, model='SIM', index=25)
portPossCurve(sm, 2)
portCloud(sm, 2.5)
Run the code above in your browser using DataLab