diff --git a/figure-3/FigS7.R b/figure-3/FigS7.R
index 4bd498e..8d86e22 100644
--- a/figure-3/FigS7.R
+++ b/figure-3/FigS7.R
@@ -190,7 +190,7 @@ plot.dat$order <- factor(plot.dat$order, levels=unique(share.dat.complete$order)
 
 head(plot.dat)
 plot.dat
-
+plot.dat$alpha_lci[is.na(plot.dat$alpha_lci)] <- 0
 
 # And take only the complete data
 # first edit