A Data Mining Approach for Visual and Analytical Identification of Neurorehabilitation Ranges in Traumatic Brain Injury Cognitive Rehabilitation

Algorithm 2

#First pass

for ( in ){

cont 1

  for ( in ) {

  if ( == 0

cont 1

← NA}

  else ← cont

cont cont + 1}

#Second pass

Mdat ←

apply(mdat, 1, function() {

    ← rle( >= MAXROW)

    ← which(!is.na($values) & $values & $lengths >= MAXCOL)

    if (length() > 0) {

        lapply(, FUN = function(){before sum($lengths) − $lengths;

                                                  (before + 1, before + $lengths

    else

        NULL