Changed precision on Ti/Tv in venn diagrams
git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@4413 348d0f76-0448-11de-a6fe-93d51630548a
This commit is contained in:
parent
d0e44b7a8e
commit
40b2f62a83
|
|
@ -186,14 +186,14 @@ eval.getMetrics <- function(eval, jexl_expression) {
|
||||||
|
|
||||||
.plot.callsetConcordance.getLabelText <- function(name, othername, metrics, filtered.metrics=NA, union) {
|
.plot.callsetConcordance.getLabelText <- function(name, othername, metrics, filtered.metrics=NA, union) {
|
||||||
if (is.na(filtered.metrics)) {
|
if (is.na(filtered.metrics)) {
|
||||||
text = sprintf("%s (%0.01f%% of union)\nCalled:\nAll: %d, Ti/Tv: %0.1f\nKnown: %d, Ti/Tv: %0.1f\nNovel: %d, Ti/Tv: %0.1f",
|
text = sprintf("%s (%0.01f%% of union)\nCalled:\nAll: %d, Ti/Tv: %0.2f\nKnown: %d, Ti/Tv: %0.2f\nNovel: %d, Ti/Tv: %0.2f",
|
||||||
name, 100*metrics$all/union$all.withfiltered,
|
name, 100*metrics$all/union$all.withfiltered,
|
||||||
metrics$all, metrics$all.titv,
|
metrics$all, metrics$all.titv,
|
||||||
metrics$known, metrics$known.titv,
|
metrics$known, metrics$known.titv,
|
||||||
metrics$novel, metrics$novel.titv
|
metrics$novel, metrics$novel.titv
|
||||||
);
|
);
|
||||||
} else {
|
} else {
|
||||||
text = sprintf("%s (%0.01f%% of union)\nCalled in %s, filtered in %s:\nAll: %d, Ti/Tv: %0.1f\nKnown: %d, Ti/Tv: %0.1f\nNovel: %d, Ti/Tv: %0.1f\n\nCalled in %s, absent in %s:\nAll: %d, Ti/Tv: %0.1f\nKnown: %d, Ti/Tv: %0.1f\nNovel: %d, Ti/Tv: %0.1f",
|
text = sprintf("%s (%0.01f%% of union)\nCalled in %s, filtered in %s:\nAll: %d, Ti/Tv: %0.2f\nKnown: %d, Ti/Tv: %0.2f\nNovel: %d, Ti/Tv: %0.2f\n\nCalled in %s, absent in %s:\nAll: %d, Ti/Tv: %0.2f\nKnown: %d, Ti/Tv: %0.2f\nNovel: %d, Ti/Tv: %0.2f",
|
||||||
name, 100*(metrics$all + filtered.metrics$all)/union$all.withfiltered,
|
name, 100*(metrics$all + filtered.metrics$all)/union$all.withfiltered,
|
||||||
|
|
||||||
name, othername,
|
name, othername,
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue