我正在尝试为我的学习系统中的每个人整合二次线性函数。
我已经为每个人拟合lm并计算了截距，线性系数和二次系数，因此我的数据集对于75个人看起来像这样：
id.x Intercept coeff1 coeff2
1 0.1683109 -0.005091914 3.850922e-05
45 -0.5147262 0.015340073 -1.142777e-04
我希望为每个人整合曲线下的区域((int+x*coeff1+I(x^2)*coeff2) from lower=60.1 to upper=70.37)。
我尝试使用写入for循环的集成函数：
for( i in 1:nrow( data ) ){
integrate( function(x)( data$Intercept[i]+data$coeff1[i]*x+data$coeff2[i]*I(x^2) ), lower=60.1, upper=70.37 )
}
除了使用sapply函数，但还没有能够工作。任何有关编码的帮助都将非常感谢!!