From 4ae4fda735d39fdd95fe24d7a1aad4d95091ffc8 Mon Sep 17 00:00:00 2001 From: Roman Cheplyaka Date: Thu, 28 Jun 2018 09:10:03 +0100 Subject: [PATCH] show: allow undefined organisms. Fixes #3 --- R/MotifList-class.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/MotifList-class.R b/R/MotifList-class.R index c6b4e2d..0605ed0 100644 --- a/R/MotifList-class.R +++ b/R/MotifList-class.R @@ -223,7 +223,7 @@ setMethod('show', 'MotifList', cat ('| Created from downloaded public sources: 2013-Aug-30', '\n', sep='') tbl.dataSource = as.data.frame (table (mcols (object)$dataSource)) - tbl.org = as.data.frame (table (mcols (object)$organism)) + tbl.org = as.data.frame (table (mcols (object)$organism, useNA="ifany")) tbl.org = head (tbl.org [order (tbl.org$Freq, decreasing=TRUE),]) totalMatrixCount = length (object) totalOrganismCount = length (unique (mcols (object)$organism))