X-Git-Url: https://git.auder.net/img/parser.js?a=blobdiff_plain;f=pkg%2FR%2Fplot.R;h=372abf0a99e086cceb9fec1dc5f9da9c5907da90;hb=6d50a76fc27236cb056a479be395ebe467666c8b;hp=2e960f52100ad7d4df690ee8fb9c3a780a0d4047;hpb=d5fe1f304b07f01264c7dca9702f75dcb8a3b7c1;p=talweg.git

diff --git a/pkg/R/plot.R b/pkg/R/plot.R
index 2e960f5..372abf0 100644
--- a/pkg/R/plot.R
+++ b/pkg/R/plot.R
@@ -192,7 +192,7 @@ computeFilaments <- function(data, index, limit=60, plot=TRUE)
 		}
 		# Also plot ref curve, in red
 		plot(ref_serie, ylim=yrange, type="l", col="#FF0000", xlab="", ylab="")
-		abline(v=24, lty=2, col=colors()[56])
+		abline(v=24, lty=2, col=colors()[56], lwd=1)
 	}
 
 	list("index"=index,"neighb_indices"=fdays[sorted_distances$ix[1:nn]],"colors"=colors)