Commit 4ea1f4dd authored by Holger Brandl's avatar Holger Brandl
Browse files

added deprecation warning when being used without design file

parent f18c070a
......@@ -99,6 +99,7 @@ genesAfter = nrow(countMatrix)
replicates2samples = read_tsv(design_matrix_file) #%>% select(replicate, sample)
warning("DEPRECATED extracting samples from replicates is bad practise and a design file should be provided instead")
get_sample_from_replicate = function(repName) str_match(repName, "(.*)_([R]|rep)?[0-9]{1,2}$")[,2]
replicates2samples = data_frame(replicate=colnames(countMatrix)) %>% mutate(sample=get_sample_from_replicate(replicate)) # %>% distinct_all()
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment