R/summary.portReturn.R

Defines functions `summary.portReturn`

`summary.portReturn` <-
function(object, ...){
	cat('Expected Return', object$R, '\n')
	cat('Risk estimate  ', sqrt(object$VAR), '\n')
}
jankcorn/stockPortfolio documentation built on May 14, 2019, 9:35 a.m.