Mercurial > repos > davidvanzessen > shm_csr
diff merge_and_filter.r @ 93:8fcf31272f6e draft
planemo upload commit a43893724cc769bed8a1f19a5b19ec1ba20cb63c
author | rhpvorderman |
---|---|
date | Mon, 06 Mar 2023 11:36:32 +0000 |
parents | 729738462297 |
children | 385dea3c6cb5 |
line wrap: on
line diff
--- a/merge_and_filter.r Mon Dec 12 12:32:44 2022 +0000 +++ b/merge_and_filter.r Mon Mar 06 11:36:32 2023 +0000 @@ -163,8 +163,8 @@ result[!higher_than,"best_match"] = paste("unmatched,", result[!higher_than,"best_match"]) } -if(class.filter == "101_101"){ - result$best_match = "all" +if(splt[1] == "101" & splt[2] == "101"){ + result$best_match = splt[3] } write.table(x=result, file=gsub("merged.txt$", "before_filters.txt", output), sep="\t",quote=F,row.names=F,col.names=T)