X-Git-Url: https://git.auder.net/?p=talweg.git;a=blobdiff_plain;f=pkg%2FR%2Fplot.R;h=2e960f52100ad7d4df690ee8fb9c3a780a0d4047;hp=2ef9074aedbe1b7115dc8958d15aa93d1b67623d;hb=d5fe1f304b07f01264c7dca9702f75dcb8a3b7c1;hpb=a5a3a294279ad55df6241426be8bcf9546aa402b

diff --git a/pkg/R/plot.R b/pkg/R/plot.R
index 2ef9074..2e960f5 100644
--- a/pkg/R/plot.R
+++ b/pkg/R/plot.R
@@ -224,6 +224,7 @@ plotFilamentsBox = function(data, fil, ...)
 	par(new=TRUE)
 	plot(c(data$getSerie(fil$index),data$getSerie(fil$index+1)), type="l", lwd=2, lty=2,
 		ylim=c(usr[3] + yr, usr[4] - yr), xlab="", ylab="")
+	abline(v=24, lty=2, col=colors()[56])
 }
 
 #' Plot relative conditional variability / absolute variability