R/is.adjacency.R

is.adjacency <- function(y){
	
	is.matrix(y) && nrow(y) == ncol(y) && all(diag(y) == 0) && all(y %in% c(0, 1, NA))

}

Try the lvm4net package in your browser

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

lvm4net documentation built on June 13, 2019, 5:03 p.m.