R/utils.R

Defines functions is.empty

is.empty <- function(object) {
	if (class(object) == "NULL")
		return (TRUE)	

	if (is.null(object))
		return (TRUE)
		
	if (length(object) == 0)
		return (TRUE)
	
	return(FALSE)
} 
sshpa/bayesvl documentation built on June 1, 2022, 12:50 a.m.