我试图绘制一个随机截距模型,其中也包含最佳拟合线。该模型旨在展示团队文化与帮助行为之间的关系。因此,所有个体都嵌套在团队中。
当我试图绘制数据时,我可以得到最适合水平绘制的线,但当我按团队分组时,我的所有随机截距都是垂直的,而不是水平的(见下图)。你对如何进行有什么建议吗?我希望所有团队线都与最佳拟合线相似,但截距不同。
这是一个示例数据集。我还包括了我的多水平模型的预测值。
mock_data <- tibble(team_num = c(1, 1, 1, 1, 1, 1, 1, 1, 110, 110, 110, 110, 112, 112, 113, 113, 113, 120, 120, 120),
pred_vig = c(2.4, 2.4, 2.4, 2.4, 2.4, 2.4, 2.4, 2.4, 2.61, 2.61, 2.61, 2.61, 2.91, 2.91, 2.42, 2.42, 2.42, 2.45, 2.45, 2.45),
exer_vig = c(4, 1, 2, 2, 3, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 3, 3, 1, 2, 3),
cent_team_wm_agg = c(-0.0908, -0.0908, -0.0908, -0.0908, -0.0908, -0.0908, -0.0908, -0.0908, -0.00952, -0.00952, -0.00952, -0.00952, 0.328, 0.328, -.297, -.297, -.297, -.122, -.122, -.122))
