tc = create_tcorpus(c('A B C', 'B C', 'B D'))
g = semnet(tc, 'token')
igraph::get.edge.attribute(g)
igraph::get.vertex.attribute(g)
plot(g)
g = set_network_attributes(g, size_attribute = 'freq')
igraph::get.edge.attribute(g)
igraph::get.vertex.attribute(g)
plot(g)
Run the code above in your browser using DataLab