From 88282b8ba196ab28e886fc45b671634f498b500a Mon Sep 17 00:00:00 2001 From: jvfe Date: Sun, 29 Sep 2024 13:53:22 -0300 Subject: [PATCH] fix: Add missing dot to regex --- bin/gen_tx2gene.r | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bin/gen_tx2gene.r b/bin/gen_tx2gene.r index 441e423..dfcb854 100755 --- 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,