# NOT RUN {
project_name <- "a_new_project"
main_path <- paste0(system.file("testdata", package = "cogmapr"), '/')
my.project <- ProjectCMap(main_path, project_name)
df.scm <- data.ggCMap(my.project, edge.filter = "4")
ggCMap.bg(df.scm)
# }
Run the code above in your browser using DataLab