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) 
 	}