R语言求出一个数据框中每行数据的可信区间的代码

以下是 R 代码，可以计算数据框中每行数据的可信区间：

#假设数据框名为mydata
library(psych)
mydata$ci <- NA #添加一个新列，用于存储可信区间的值
for (i in 1:nrow(mydata)) {
  mydata$ci[i] <- ci(mydata[i,])[2] - ci(mydata[i,])[1] #计算每行数据的可信区间
}