search

cardiomoon / processR

52 stars 10 forks source link

Labels bug with modelsSummary at least for model 59 #14

Open iago-pssjd opened 3 years ago

iago-pssjd commented 3 years ago

I use the example in https://rpubs.com/cardiomoon/481347: If one does

statisticalDiagram(59,labels=labels)

one gets image

but later, if one does

moderator=list(name="Parents",site=list(c("a","b","c")))
equations=tripleEquation(labels=labels,moderator=moderator,mode=1) 
fit=eq2fit(equations,data=Marshmallow.Mod)
modelsSummaryTable(fit,labels=labels)
==================================================================================================== 
                                                         Consequent                                  
                         --------------------------------------------------------------------------- 
                                       Trust(M)                            Success(Y)              
                         -------------------------------------  -------------------------------------  
       Antecedent               Coef     SE      t       p            Coef     SE      t       p     
---------------------------------------------------------------------------------------------------- 
         Time(X)          a1   0.060   0.184   0.328    .743  c'1   0.092   0.494   0.186    .852  
       Parents(W)         a2  -0.122   0.296  -0.413    .680  c'2   0.523   0.744   0.702    .483  
    Time:Parents(X:W)     a3   0.319   0.056   5.738   <.001  c'3   0.100   0.167   0.597    .551  
        Trust(M)                                                b   0.222   0.277   0.801    .424  
   Parents:Trust(W:M)                                         c'4   1.028   0.079  13.050   <.001  
        Constant          iM  -0.430   0.958  -0.449    .654   iY  -0.752   2.413  -0.312    .755  
---------------------------------------------------------------------------------------------------- 
      Observations                        300                                  300                 
           R2                            0.568                                0.914                
       Adjusted R2                       0.564                                0.913                
       Residual SE                 3.004 ( df = 296)                    7.549 ( df = 294)          
       F statistic           F(3,296) = 129.919, p < .001         F(5,294) = 626.344, p < .001     
====================================================================================================

one gets c'4 instead of b2.

Thank you!