comparison hairpinTool.R @ 16:525bf4364896

- Fixed sample reads filter statistics a bit more
author shian_su <registertonysu@gmail.com>
date Mon, 12 Jan 2015 16:35:08 +1100
parents 5a917ea5bed2
children
comparison
equal deleted inserted replaced
15:5a917ea5bed2 16:525bf4364896
986 "%) target sequences were filtered out for low ", 986 "%) target sequences were filtered out for low ",
987 "count-per-million.") 987 "count-per-million.")
988 ListItem(tempStr) 988 ListItem(tempStr)
989 } 989 }
990 990
991 if (sampleReq != 0) { 991 if (readReq != 0) {
992 tempStr <- paste("Samples that did not produce more than", readReq, 992 tempStr <- paste("Samples that did not produce more than", readReq,
993 "counts were filtered out.") 993 "counts were filtered out.")
994 ListItem(tempStr) 994 ListItem(tempStr)
995 995
996 tempStr <- paste0(sampleFilterCount, " samples were filtered out for low ", 996 tempStr <- paste0(sampleFilterCount, " samples were filtered out for low ",