# NOT RUN {
# add text to an activity network
activityNetwork <- collectData %>% Create("activity") %>% AddText(collectData)
# network
# activityNetwork$nodes
# activityNetwork$edges
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab