lmer无法收敛

Question

我正在进行一项实验，测试道德价值观（特别是平均主义和社群主义）如何影响股票投资决策。 我给参与者提供了三种不同的信息，并询问他们是否打算投资该公司的股票。信息是

1. 顾问类型：两位财务顾问的建议。每个顾问的代码分别为-1和1。
2. 新闻类型：公司的好/坏消息/动作。编码为-1和1。
3. 公司：12个不同的公司。

参与者表示他们有可能以0-100的规模进行投资。这是名为投资的变量。

运行此模型没有问题

Model <- lmer(Investment ~ Commu + egal + AdvisorType + 
                           AdvisorType:egal + Company + Company:egal+ 
                           NewsType + NewsType:egal+
                           (AdvisorType+NewsType|Participants),
                           data = MM5A, na.action = na.exclude)

但是当我将公司添加到斜坡上时。我收到以下错误消息。

Model1 <-lmer(Investment ~ Commu + egal + AdvisorType + AdvisorType:egal + 
                           Company + Company:egal+ NewsType +      
                           NewsType:egal+
                           (AdvisorType+NewsType+Company|Participants), 
                           data = MM5A, na.action = na.exclude)

警告信息：
在checkConv（attr（opt，“ derivs”），opt $ par，ctrl = control $ checkConv，：
模型无法与max | grad |收敛= 0.00724121（tol = 0.002，组件1）

当我在斜坡上没有AdvisorType或NewsType的情况下跑步时，会收到相同的错误消息。但是，我可以同时运行模型（即仅Company作为斜率）

如果有人对解决此问题有任何想法，请告诉我。 我已经提供了我的数据文件MM5A的屏幕截图，如果您需要任何其他信息，请随时询问！