背景：
一个生物的数据
行：各个基因
第一列和第二列：对照组（两个重复）
第三列到第五列：处理组（三个重复）
用来计算各个基因的p值，我写了一个循环，但是算出来的结果p值是完全一致的

定义数据为dat
for (i in 1:nrow(dat)){
  if(sd(dat[i,1:2]) == 0 & sd(dat[i,3:5]) == 0){
    pvals <- "NA"  ##p值为NA
    }
  else{
    t_test = t.test(as.numeric(dat[i,1:2]), as.numeric(dat[i,3:5]))
    pvals <- t_test$p.value
  }
}


但是，单独运行t.test(as.numeric(dat[i,1:2]), as.numeric(dat[i,3:5]))代码，就能计算出不同的p值

我是哪里写错了啊