diff --git a/RMatchGenes.R b/RMatchGenes.R index 9777c12..8cb355b 100644 --- a/RMatchGenes.R +++ b/RMatchGenes.R @@ -6,7 +6,7 @@ library(readr) library(dplyr) Check2Match <- function(){ - numrows <- "How many rows of clinical data are their in the each data set?: " %>% + numrows <- "How many rows of clinical data are their in the each data set (seperate each number by a comma no spaces)?: " %>% readline(prompt = .) %>% strsplit(.,split = ",") %>% .[[1]] %>%