R/first.R

"first" <-
function(x, na.rm=FALSE) {
	if (na.rm) 
		x <- x[!is.na(x)]
	x[1]
}
phgrosjean/pastecs documentation built on Feb. 12, 2024, 2:26 a.m.