debugging

VEuPathDB · Nov 13, 2023 · 73ceed6 · 73ceed6
1 parent be78b53
commit 73ceed6
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/methods-Megastudy.R b/R/methods-Megastudy.R
@@ -124,6 +124,8 @@ setMethod('getEntityId', signature('StudySpecificVocabulariesByVariable'), funct
 #' @include methods-Statistic.R
 #' @export
 setMethod('as.data.table', signature('StudySpecificVocabulary'), function(x) {
+  message("as.data.table StudySpecificVocabulary- vocabulary: ", x@vocabulary)
+  message("vocab length: ", length(x@vocabulary))
   .dt <- data.table::data.table('study'=x@study, 'variable'=x@vocabulary)
   names(.dt) <- c(x@studyIdColumnName, getColName(x@variableSpec))