Sto cercando di creare uno script che posso utilizzare ogni volta con il minimo sforzo per eseguire direttamente ANOVA e Chi-quadrato.
Ho iniziato lo script:
Names Default To Here(1);
dt=Current Data Table();
dlg = Column Dialog(
name = ColList( "Parameters", Min Col(1) ),
subject = ColList( "Treatment", Min Col(1), MaxCol(1) ),
Reffect = ColList( "Random", Min Col(0), MaxCol(2) )
);
// Stop if the user did not press 'OK'
If( dlg["Button"] != 1, Beep(); Throw());
name = dlg[ "name" ];
subject = dlg["subject"];
Reffect = dlg ["Reffect"];
show (name, subject, Reffect);
dt<<FIT model=""></FIT>
However, there is an issue to do the fit model. The fit model box open only with the Y.
on the Y most of the time I need to add more than 1 variable as well, so I will have more student residuals to save to be able to verify the outliers, then the normal distribuition and the equal variance.
Thanks for your help :)</img>
CIAO,
Prova a modificare il codice per aggiungere eval(eval expr(expr))). C'è un post del blog qui che spiega un po' come funziona. Inoltre, il modo in cui è impostata la finestra di dialogo delle colonne consente di selezionare più Y.
Eval(Eval Expr(obj=dt<<FIT model=""></FIT>