R/print.time.R

`print.time` <-
function (x, ...)
 
{
	res = data.frame(time=as.vector(x));
	class(res$time)="time";
	rownames(res)=names(x);
	print(res);
	invisible(res);
}

Try the moonsun package in your browser

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

moonsun documentation built on May 29, 2017, 12:17 p.m.