R/summary.cf.R

"summary.cf" <-
function (object,flows=2:length(object$cf),...) 
{
	for (k in flows) {

	cat("\n#",k,"\n");

	print(cf(object$cf[1:k],object$tab[,1]));

	}

}

Try the financial package in your browser

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

financial documentation built on May 30, 2017, 2:35 a.m.