在Rstudio中使用此data。我需要在foreach($my_arr as $indx=>$val )
{
if(is_int($indx) && ($indx>=0 && $indx<=4))
{
$my_arr[$indx]= $val;
}
else
{ continue; }
}
上运行ed76
的简单回归和饱和回归,将lwage76
转换为列中每个级别的虚拟变量。然后我需要在XY图中绘制两个回归,其中ed76
为Y轴,lwage76
为X轴。这就是我到目前为止所做的:
ed76
这给了我一个非常好的XY图,但是现在我需要从我的staturated模型中添加预测值:
regression <- lm(nlsdata$lwage76~nlsdata$ed76)
predicted <- data.frame(Edu =nlsdata$ed76, Wage = predict(regression))
aggplot <- aggregate(Wage ~ Edu, data=predicted, mean)
xyplot( Wage ~ Edu, data = aggplot, grid = TRUE, type = c("p","l"))
那么如何将第二个数据集添加到我拥有的图表中呢?