Mercurial > repos > petr-novak > re_utils
changeset 20:5a05925340b0 draft
Uploaded
author | petr-novak |
---|---|
date | Mon, 07 Jun 2021 08:46:07 +0000 |
parents | 2f1b5d5c5dd5 |
children | f4ed6a65a2ff |
files | plot_comparative_clustering_summary.R |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/plot_comparative_clustering_summary.R Tue May 18 11:03:57 2021 +0000 +++ b/plot_comparative_clustering_summary.R Mon Jun 07 08:46:07 2021 +0000 @@ -52,7 +52,7 @@ header_line = grep(".*Cluster.*Supercluster.*Size", readLines(cluster_annotation)) annot = read.table(cluster_annotation, sep="\t",header=TRUE,as.is=TRUE, skip = header_line - 1) ## validate - annot_file_valid = all(colnames(annot)==c("Cluster","Supercluster","Size","Size_adjusted","Automatic_annotation","TAREAN_annotation","Final_annotation")) + annot_file_valid = all(c("Cluster","Supercluster","Size","Size_adjusted","Automatic_annotation","TAREAN_annotation","Final_annotation") %in% colnames(annot)) if (!annot_file_valid | !counts_file_valid){