for ($a=0; $a<=$#columns; $a++) {
    for ($b=0; $b<=$#columns; $b++) {
      $m_avrg[$a][$b] += $list[$a][$b];
     }
  }