if (FALSE) {
# create a twitter actor network excluding retweet, quote tweets and mention edges
actor_net <- twitter_data |>
Create("actor", rmEdgeTypes = c("retweet", "quote"))
# network nodes and edges
names(actor_net)
# "nodes", "edges"
names(actor_net$nodes)
# "user_id", "screen_name"
names(actor_net$edges)
# "from", "to", "status_id", "created_at", "edge_type"
}
Run the code above in your browser using DataLab