Community Detection in city

Community_Detection.cypher

CALL algo.scc(
  'MATCH (p:Person)-[:FROM]->(:City { name: "Bangkok" }) RETURN id(p) as id',
  'MATCH (p1:Person)-[:OUT]->(:Call)<-[:IN]-(p2:Person) RETURN id(p1) as source, id(p2) as target',
  { write: true, writeProperty: 'communityId', graph:'cypher' })
YIELD communityCount
MATCH (p:Person)-[:FROM]->(:City { name: "Bangkok" })
WITH p.name as name, p.communityId as communityId
RETURN communityId, count(name) as total
ORDER BY total DESC

// show community ring
MATCH (p:Person { communityId: 17 })-[:OUT]->(c:Call)
RETURN p, c

// apply to all cities
MATCH (c:City)
UNWIND c.name as cityName
CALL algo.scc(
  'MATCH (p:Person)-[:FROM]->(:City { name: "' + cityName + '" }) RETURN id(p) as id',
  'MATCH (p1:Person)-[:OUT]->(:Call)<-[:IN]-(p2:Person) RETURN id(p1) as source, id(p2) as target',
  { write: true, writeProperty: 'communityId', graph:'cypher' })
YIELD communityCount
MATCH (p:Person)-[:FROM]->(:City { name: cityName })
WITH cityName, p.name as name, p.communityId as communityId
RETURN cityName, communityId, count(name) as total
ORDER BY total DESC