fix: Add missing dot to regex

dalmolingroup · Sep 29, 2024 · 88282b8 · 88282b8
1 parent 5efc0b4
commit 88282b8
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bin/gen_tx2gene.r b/bin/gen_tx2gene.r
@@ -26,8 +26,8 @@ txdf <- AnnotationDbi::select(
 tab <- table(txdf$GENEID)
 txdf$ntx <- tab[match(txdf$GENEID, names(tab))]
 
-txdf$TXNAME <- gsub("\\.*", "",  txdf$TXNAME)
-txdf$GENEID <- gsub("\\.*", "",  txdf$GENEID)
+txdf$TXNAME <- gsub("\\..*", "",  txdf$TXNAME)
+txdf$GENEID <- gsub("\\..*", "",  txdf$GENEID)
 
 tx2gene <- data.frame(
     tx = txdf$TXNAME,