From 51d31a33543c4ec4f1fdeafafdf73f2e4aa4a036 Mon Sep 17 00:00:00 2001 From: Efrain Gonzalez Date: Fri, 16 Jun 2017 10:59:33 -0400 Subject: [PATCH] Update (UNTESTED) --- RCleanDscret.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/RCleanDscret.R b/RCleanDscret.R index 7ca3f86..8f5efe2 100644 --- a/RCleanDscret.R +++ b/RCleanDscret.R @@ -47,7 +47,7 @@ chngrownm <- function(mat){ colnames(mat)[j] <- paste0("Braak",b) b = b + 1 } - if(grepl("group|disease|control|AD|normal|diagnosis|Alzheimer|Control",mat[2,j])==TRUE){ + if(grepl("group|disease|control|AD|normal|diagnosis|Alzheimer|Control|Normal",mat[2,j])==TRUE){ colnames(mat)[j] <- paste0("Group",g) g = g + 1 } -- 2.29.0