if (FALSE) {
# create a twitter activity network with retweets removed
activity_net <- twitter_data |>
Create("activity", rmEdgeTypes = c("retweet"))
# network nodes and edges
names(activity_net)
# "nodes", "edges"
names(activity_net$nodes)
# "status_id", "author_id", "author_screen_name", "created_at"
names(activity_net$edges)
# "from", "to", "user_id", "screen_name", "created_at", "edge_type"
}
Run the code above in your browser using DataLab