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)
} 

Try the bayesvl package in your browser

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

bayesvl documentation built on May 24, 2019, 5:09 p.m.