Building a mentions graph

Case Studies: Network Analysis in R

Edmund Hart

Instructor

Recall tweet anatomy

AlexisAchim: "@LAStools @Lees_Sandbox @jhollist @LeahAWasser LidR is also available directly on CRAN #rstats"

timelyportfolio: "just might have a demo of @emeeks new #reactjs/#d3js semiotic in #rstats in the works"

Build your mentions graph

ment_g <- graph.empty()
ment_g <- ment_g + vertices(all_sn)

for(i in 1:dim(raw_tweets)[1]) {
  ment_name <- mention_ext(raw_tweets$tweet_text[i])

  if(length(ment_name) > 0 ) {

    # Add the edge(s)
    for(j in ment_name) {

      # Check to make sure the vertex exists, if not, add it
      if(!j %in% all_sn) { 
        ment_g <- ment_g + vertices(j)  }
      ment_g <- ment_g + edges(c(raw_tweets$screen_name[i], j))
    }
  }
}

ment_g <- simplify(ment_g)
ment_g <- delete.vertices(ment_g, degree(ment_g) == 0)

Retweet Graph

Mentions Graph

Let's practice!

Case Studies: Network Analysis in R