R/cctr.R

Defines functions cctr

Documented in cctr

cctr <-
function(tickers, weights=rep(1,length(tickers)), start, end, data)
{
  w = weights/sum(weights)
  cctr = w*mctr(tickers, weights, start, end, data)
  return(cctr)
}

Try the PortRisk package in your browser

Any scripts or data that you put into this service are public.

PortRisk documentation built on May 2, 2019, 7:22 a.m.