Lower precision on Ti/Tv in variant summary matrix

git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@4412 348d0f76-0448-11de-a6fe-93d51630548a
This commit is contained in:
kiran 2010-10-02 05:18:48 +00:00
parent 6deb755164
commit d0e44b7a8e
1 changed files with 1 additions and 1 deletions

View File

@ -222,7 +222,7 @@ plot.titlePage <- function(title, author) {
knownTiTv = eval$TiTv[which(eval$TiTv$jexl_expression == jexl_expression & eval$TiTv$filter_name == "called" & eval$TiTv$novelty_name == "known"),]$ti.tv_ratio;
novelTiTv = eval$TiTv[which(eval$TiTv$jexl_expression == jexl_expression & eval$TiTv$filter_name == "called" & eval$TiTv$novelty_name == "novel"),]$ti.tv_ratio;
cbind(allVariants, knownVariants, knownTiTv, novelVariants, novelTiTv);
cbind(allVariants, knownVariants, sprintf("%0.2f", knownTiTv), novelVariants, sprintf("%0.2f", novelTiTv));
}
plot.variantTable <- function(eval, title) {