# Final Project for the University of Tulsa's CS-7863 Network Theory Course
# Compliance Graph Analysis
# Professor: Dr. McKinney, Spring 2022
# Noah L. Schrick - 1492657

library(igraph)
library(sna)
library(Rgraphviz) # Reading graphviz' "dot" files
library(readr)

################# Read in the previously generated networks #################
# If sourcing:
#setwd(getSrcDirectory()[1])
# If running:
setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
source("./CG_Files/manual_import.R")

car <- import_networks(1)
hipaa <- import_networks(2)
pci <- import_networks(3)

car.deg <- degree(car)
hipaa.deg <- degree(hipaa)
pci.deg <- degree(pci)