From 88ae4801d7c8d34c5021e4990ff9415e8e536c5c Mon Sep 17 00:00:00 2001 From: Andre Date: Fri, 30 Aug 2024 15:36:25 +0800 Subject: [PATCH] Fix typo in extendAnnotations --- R/bambu-extendAnnotations-utilityExtend.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/bambu-extendAnnotations-utilityExtend.R b/R/bambu-extendAnnotations-utilityExtend.R index 01310fa9..75065607 100644 --- a/R/bambu-extendAnnotations-utilityExtend.R +++ b/R/bambu-extendAnnotations-utilityExtend.R @@ -108,7 +108,7 @@ filterTranscriptsByAnnotation <- function(rowDataCombined, annotationGrangesList exonRangesCombined <- exonRangesCombined[filterSet] rowDataCombined <- rowDataCombined[filterSet,] } - if(sum(filterSet==0) & length(annotationGrangesList)==0) stop( + if(sum(filterSet)==0 & length(annotationGrangesList)==0) stop( "WARNING - No annotations were provided. Please increase NDR threshold to use novel transcripts") if(sum(filterSet)==0) message("WARNING - No novel transcripts meet the given thresholds. Try a higher NDR.") # (3) combine novel transcripts with annotations