R/print.circsizer.R

In NPCirc: Nonparametric Circular Methods

Defines functions print.circsizer

Documented in print.circsizer

print.circsizer<-function(x, digits=NULL, ...) {
	cat("\nCall:\n\t", deparse(x$call), "\n\nngrid: ", x$ngrid, 
	"\tlog.scale: ", x$log.scale, "\n\nBandwidths = ", "\n\t", sep = "")
	print(x$bw, digits=digits, ...)
}

Try the NPCirc package in your browser