From 28945245f49fafed3d05579166a46530845d2d8a Mon Sep 17 00:00:00 2001 From: Ben Green Date: Tue, 22 Sep 2015 08:28:13 -0400 Subject: script to plot entire lcc --- R Scripts/analyze-cascades.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'R Scripts/analyze-cascades.R') diff --git a/R Scripts/analyze-cascades.R b/R Scripts/analyze-cascades.R index 9a47ece..f03af36 100755 --- a/R Scripts/analyze-cascades.R +++ b/R Scripts/analyze-cascades.R @@ -43,7 +43,7 @@ start_date + range(times) cb = brewer.pal(3,'Paired') cols = rep('#1f78b4',vcount(cc)) seed = which(degree(cc,mode='in')==0) -cols[seed] = '#d95f02' +cols[seed] = '#e41a1c' plot(cc,vertex.size=8,edge.arrow.size=0.2,vertex.color=cols,vertex.label=NA, layout=layout.reingold.tilford(cc,root=seed), edge.color='black',vertex.frame.color=NA) -- cgit v1.2.3-70-g09d2