@data = map { #? data is skiped when plotted
   if($maxreject[$i]) {
  $_ = "?$_" if($_ > $maxclip);
   }
   if($minreject[$i]) {
  $_ = "?$_" if($_ < $minclip);
   }
   $i++;
  } @data;