R code to build panel co-attendance networks from AFSP biennial conferences.
Briatte, François. 2017. AFSP Conference Panel Co-attendance Data. DOI: 10.5281/zenodo.835615.
The DATA file contains a detailed codebook for all files present in the data
folder.
# -- PACKAGE DEPENDENCIES (repeated in scripts) --------------------------------
# data
library(dplyr)
library(purrr)
library(readr)
library(rvest)
library(stringr)
library(tidyr)
# networks
library(igraph)
library(ggplot2)
library(ggraph)
# -- BUILD NETWORKS ------------------------------------------------------------
# full construction routine
source("01_data.r")
source("02_two_mode_networks.r")
source("03_one_mode_networks.r")
# to load the edge list on its own
d <- readr::read_tsv("data/edges.tsv", col_types = "icciiiiccc")
# to load the weighted incidence matrix on its own
w <- readr::read_rds("data/incidence_matrix.rds")
# -- PANEL DATA ----------------------------------------------------------------
# to read the panel information data
p <- readr::read_tsv("data/panels.tsv", col_types = "iccc")
# to check that all panel identifiers match
dplyr::mutate(p, j = stringr::str_c(year, "_", id)) %>%
dplyr::inner_join(d, by = c("year", "j")) %>%
nrow(.) == nrow(d)
# -- OTHER FILES ---------------------------------------------------------------
# participant details
n <- readr::read_tsv("data/participants.tsv", col_types = "cccc")
# corrected names
n <- readr::read_tsv("data/participants_names.tsv", col_types = "ccc") # or "icc"
# missing genders
g <- readr::read_tsv("data/participants_genders.tsv", col_types = "cc")
# various fixes to panel participants
f <- readr::read_tsv("data/participants_fixes.tsv", col_types = "ccc")
# modified names for some panels
f <- readr::read_tsv("data/panels_fixes.tsv", col_types = "ccc")
The contents of this repository are released under a Creative Commons Attribution-NonCommercial-ShareAlike license.