R/nobs.R

## number of observations

setMethod("nobs", "PSTf", function(object) {
	
	res <- sum(object[[1]][["e"]]@n)
	
	return(res)
})

Try the PST package in your browser

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

PST documentation built on May 2, 2019, 5:14 p.m.