if (FALSE) {
proj_path <- system.file('extdata',package='graph4lg')
proj_name <- "grphb_ex"
linkset <- "lkst1"
nodes <- "graph"
graph <- graphab_to_igraph(proj_name = proj_name,
linkset = "lkst1",
nodes = "graph",
links = links,
weights = "cost",
proj_path = proj_path,
crds = FALSE,
fig = FALSE)
}
Run the code above in your browser using DataLab