R/isRecursingEntityDefinition.R

In Matherion/metabefor: Facilitating systematic review and meta-analyses

isRecursingEntityDefinition <- function(node,
                                        recursingColName=entityColNames()$recursingCol) {
  return(((!is.null(node[[recursingColName]])) &&
          (!is.na(node[[recursingColName]])) &&
            (isTRUE(node[[recursingColName]]) ||
            (toupper(node[[recursingColName]])=="TRUE"))));
}