R/first.R

"first" <-
function(x, na.rm=FALSE) {
	if (na.rm) 
		x <- x[!is.na(x)]
	x[1]
}

Try the pastecs package in your browser

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

pastecs documentation built on May 29, 2024, 5:56 a.m.