加载时函数为什么不提供任何输出？

Question

这里我定义了函数AVPictureInPictureController，在其中我正在运行 t -test。但最后，CpG.T.Test和t都不存在。

p

Answer 1

由于您需要返回2个变量，您可以将它们组合成一个数据帧并按如下方式返回：

CpG.T.Test  <- function(betam, pheno){
  R = 50000
  t = numeric(R)
  p = numeric(R)

  for (i in 1:R){
    beta.v <- betam[i, ]
    pheno.v <- pheno

    test <- t.test (beta.v ~ pheno.v)
    t[i] = test$statistic
    p[i] = test$p.value
  }

  cbind(t,p) # the last variable used in the scope is usually returned.
  ## OR
  ## return cbind(t,p) # or you can explicitly return the variable
}