From f31013ecc91acf582dd16f924dedeecc38cad44d Mon Sep 17 00:00:00 2001
From: Elliot Fontaine <92150839+elliotfontaine@users.noreply.github.com>
Date: Tue, 2 Apr 2024 12:01:04 +0200
Subject: [PATCH] fixed typo in plot legend

---
 R/plot.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/plot.R b/R/plot.R
index 49ad45e..39a0878 100644
--- a/R/plot.R
+++ b/R/plot.R
@@ -102,7 +102,7 @@ plotChrom <- function(chromatograms,scans){
 	
 	if (length(scans) > 0) {
 		pl <- pl +
-			labs(caption = 'Red lines indcate scan range used for spectral binning.') +
+			labs(caption = 'Red lines indicate scan range used for spectral binning.') +
 			geom_vline(xintercept = min(scans),colour = 'red',linetype = 2) +
 			geom_vline(xintercept = max(scans),colour = 'red',linetype = 2) 
 	}