Commit cfdc6fcd by Eric Coissac

For a given protein consider only cluster with at list a score of 95% of

the best score
parent 79d7c6cc
...@@ -77,7 +77,7 @@ BEGIN { ...@@ -77,7 +77,7 @@ BEGIN {
} }
END { END {
ClustScoreMax=0
# make clusters # make clusters
pi = -1 pi = -1
for (i in Cover) { for (i in Cover) {
...@@ -103,12 +103,29 @@ END { ...@@ -103,12 +103,29 @@ END {
Clust[clusno]["score"] = score Clust[clusno]["score"] = score
Clust[clusno]["strand"] = Entry[i]["strand"] Clust[clusno]["strand"] = Entry[i]["strand"]
Clust[clusno]["entry"] = i Clust[clusno]["entry"] = i
if (score > ClustScoreMax)
ClustScoreMax=score
} }
} }
# Consider only cluster with at least 95% of the best score
NbClustOk=0
for (i = 1 ; i <= NbClust ; i++) {
if (Clust[i]["score"] >= ClustScoreMax * 0.95)
NbClustOk++
else
Clust[i]["score"]=0
}
# print cluster info # print cluster info
print "c nclust", NbClust+0 print "c nclust", NbClustOk+0
for (i = 1 ; i <= NbClust ; i++) { for (i = 1 ; i <= NbClust ; i++) {
if (Clust[i]["score"] == 0) continue
print "c cluster", i, "from", Clust[i]["from"], "to", Clust[i]["to"],\ print "c cluster", i, "from", Clust[i]["from"], "to", Clust[i]["to"],\
"strand", Clust[i]["strand"], "score", Clust[i]["score"] "strand", Clust[i]["strand"], "score", Clust[i]["score"]
} }
......
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