Corrected for one-sample test case and use plus smbol instead of rowSums