Network Theory, Social Network Analysis, Community Detection, Yelp, R.
library(tidyverse) library(igraph) user_out <- lapply(readLines("yelp_academic_dataset_user.json"), fromJSON) #parse through each user's data and only obtain columns we are interested in yelp_parse <- function(x) { parse_list <- list(user_id = x$user_id, name = x$name, review_count =