diff options
Diffstat (limited to 'R Scripts/data-exploration.R')
| -rwxr-xr-x | R Scripts/data-exploration.R | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/R Scripts/data-exploration.R b/R Scripts/data-exploration.R index 16e7bba..f8f6892 100755 --- a/R Scripts/data-exploration.R +++ b/R Scripts/data-exploration.R @@ -1,6 +1,6 @@ library(igraph) setwd("~/Documents/Violence Cascades/") -load('Results/hyper-lcc.RData') +load('Raw Data/lcc.RData') d = remove.edge.attribute(person,'weight') lcc = induced.subgraph(d,which(clusters(d)$membership==which.max(clusters(d)$csize))) @@ -29,8 +29,8 @@ S ##### Degree Distribution plot(1:max(degree(lcc)),degree.distribution(lcc)[-1]*vcount(lcc), - log='xy',col='#377EB8',pch=20, - xlab='Degree', ylab='Number of Vertices', main='') + log='xy',col='#1f78b4',pch=20,cex.axis=0.6,cex.lab=0.6, + xlab='Degree', ylab='Number of vertices', main='') pl = power.law.fit(degree.distribution(lcc)) ##### Victims |