R/removeSwappedDupKeyValueDf.R

removeSwappedDupKeyValueDf <- function(x){
  foo <- igraph::graph_from_data_frame(x,directed=FALSE)
  foo <- igraph::simplify(foo,edge.attr.comb = list("first"))
  foo <- igraph::as_data_frame(foo,what='edges')
  return(foo)
}
blogsdon/utilityFunctions documentation built on May 12, 2019, 9:32 p.m.