R/assert_known_standard.R

Defines functions assert_known_standard

assert_known_standard <- function(adj){
  assert_adjacency(adj)
  if(!is_standard(adj)) stop(deparse(substitute(adj)), " must be in the standard format")
  invisible(NULL)
}
drostlab/edgynode documentation built on March 29, 2024, 10:36 a.m.