summaryrefslogtreecommitdiffstats
path: root/R Scripts/find-cascades.R
diff options
context:
space:
mode:
authorBen Green <ben@SEASITs-MacBook-Pro.local>2015-06-15 17:15:33 -0400
committerBen Green <ben@SEASITs-MacBook-Pro.local>2015-06-15 17:15:33 -0400
commitf7997e0c67ea85b42da94894b6a6f9bef7382170 (patch)
tree57ac35463e4d45a84c0e1f215793519023a9ccbc /R Scripts/find-cascades.R
parent1143cf60812c37957c81d39d6180921460e62901 (diff)
downloadcriminal_cascades-f7997e0c67ea85b42da94894b6a6f9bef7382170.tar.gz
minor changes for testing
Diffstat (limited to 'R Scripts/find-cascades.R')
-rw-r--r--R Scripts/find-cascades.R10
1 files changed, 5 insertions, 5 deletions
diff --git a/R Scripts/find-cascades.R b/R Scripts/find-cascades.R
index ecd5c83..0a69c5c 100644
--- a/R Scripts/find-cascades.R
+++ b/R Scripts/find-cascades.R
@@ -2,17 +2,17 @@ library(igraph)
setwd("~/Documents/Cascade Project/")
load('Results/hyper-lcc.RData')
load('Results/dag_dat_vics.RData')
-source('Scripts/temporal.R')
+source('criminal_cascades/R Scripts/temporal.R')
# source('Scripts/homophily.R')
-source('Scripts/structural.R')
+source('criminal_cascades/R Scripts/structural.R')
vic_ids = which(V(hyp_lcc)$vic==TRUE)
#### Initialize model parameters
-alpha = 1/5
+alpha = 1/21
# gamma = 0.3
-delta = 0.1
-beta = 9.955713e-6
+delta = 0.001
+beta = 0.00796964464237
##### Get weights
# find max n days where infection possible given alpha