R/igraphtoGNAR.R

In GNAR: Methods for Fitting Network Time Series Models

Defines functions igraphtoGNAR

Documented in igraphtoGNAR

igraphtoGNAR <- function(ig){
  stopifnot(is.igraph(ig))
  if(is.weighted(ig)){
    weimat <- get.adjacency(ig, attr="weight")
  }else{
    weimat <- get.adjacency(ig)
    weimat <- as.matrix(weimat)
  }
  net <- matrixtoGNAR(weimat)
  return(net)
}

Try the GNAR package in your browser