Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/65.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 在混合效应模型中,如何将时间=0时的结果基线值作为固定效应添加?_R_Lme4_Mixed Models - Fatal编程技术网

R 在混合效应模型中,如何将时间=0时的结果基线值作为固定效应添加?

R 在混合效应模型中,如何将时间=0时的结果基线值作为固定效应添加?,r,lme4,mixed-models,R,Lme4,Mixed Models,我的研究为期12周,涉及两种饮食(饮食)。在时间=0、6和12周的间隔内进行结果测量,如体重、腰围等。(代码)代表主题 我尝试了以下代码来创建一个名为weight0的新变量,以仅在time=0时拾取结果值 weight0 <- dat2$weight[dat2$time==0] weight0您可以执行以下操作来定义weight0: dat2 <- dat2[order(dat2$code, dat2$time), ] dat2$weight0 <- with(dat2,

我的研究为期12周,涉及两种饮食(饮食)。在时间=0、6和12周的间隔内进行结果测量,如体重、腰围等。(代码)代表主题

我尝试了以下代码来创建一个名为weight0的新变量,以仅在time=0时拾取结果值

weight0 <- dat2$weight[dat2$time==0] 

weight0您可以执行以下操作来定义
weight0

dat2 <- dat2[order(dat2$code, dat2$time), ]
dat2$weight0 <- with(dat2, ave(weight, code, FUN = function (x) x[1]))
dat2
dat2 <- dat2[order(dat2$code, dat2$time), ]
dat2$weight0 <- with(dat2, ave(weight, code, FUN = function (x) x[1]))