6772_de-DE

liliconcom

Logistische Regression - komplizierte Situation<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Hallo ,

Bevor ich das Problem beschreibe, muss ich erwähnen, dass ich mit JMP7 arbeite.

Ich habe eine Tabelle mit 12 Spalten, die ersten 6 Spalten sind beschreibende Parameter für jede der nächsten 6 Spalten. Die ersten 6 Spalten sind alle Zeichen und die letzten 6 Spalten sind alle numerisch, binomial.

Ich muss logistische Regression für jede der letzten 6 Spalten ausführen und die ersten 6 Spalten als Prädiktoren verwenden, um den "Prob> ChiSq" -Wert aus dem "Pearson" -Test zu extrahieren.

Jetzt habe ich das folgende Skript für eine der Spalten "Y, Response" erstellt:

dt = Current Data Table();
column_names = dt << Get Column Names(Character, String);

results = New Table("Results", Invisible,
                  New Column("Parameter", character),
                  New Column("GEN", numeric),
                  Add Rows(NItems(column_names))
                    );

for(i=1,i<=NItems(column_names),i++,
  colName = column_names;
  cmd = Expr(
    ow = dt << Contingency(
                Y( :GEN),
                X( :cName ),
                Contingency Table( 0 ),
                Mosaic Plot( 0 )
                );
                Wait(0.1);
    
    owr = ow<
    
    
    pValueBox= owr[NumberColBox(6)];
    pValue = pValueBox[2];

    Column(results,1) = colName;
    Column(results,2) = pValue;
  
    ow << Close Window;
    );
    Substitute Into(cmd,Expr(cName),colName);
    Eval(cmd);
    );
results << journal;
Close(results);

Wenn ich es laufen lasse, funktioniert es perfekt. Wenn ich nun die nächste Spalte zu Skript hinzufüge:

dt = Current Data Table();
column_names = dt << Get Column Names(Character, String);
results = New Table("Results", Invisible,
                  New Column("Parameter", character),
                  New Column("GEN", numeric),
                  New Column("Ne", numeric),
                  Add Rows(NItems(column_names))
                    );
for(i=1,i<=NItems(column_names),i++,
  colName = column_names;
  cmd = Expr(
    ow = dt << Contingency(
                Y( :GEN, :Ne),
                X( :cName ),
                Contingency Table( 0 ),
                Mosaic Plot( 0 )
                );
                Wait(0.1);
    
    owr = ow<
    
    
    pValueBox= owr[NumberColBox(6)];
    pValue = pValueBox[2];

    pValueBox1= owr[NumberColBox(12)];
    pValue1 = pValueBox1[2];


    Column(results,1) = colName;
    Column(results,2) = pValue;
    Column(results,3) = pValue1;  

    ow << Close Window;
    );
    Substitute Into(cmd,Expr(cName),colName);
    Eval(cmd);
    );
results << journal;
Close(results);

Das Skript funktioniert nicht mehr. Ich habe die Baumstruktur überprüft und beide NumberColBoxes beziehen sich auf die richtigen Werte, aber es wird kein Journal erstellt und das Skript funktioniert nicht mehr.

Nun meine Fragen:

1) Wie kann ich meine Situation lösen, wenn ich mehrere Y-Werte statisch habe?

2) Kann man den dynamischen Y-Wert über eine Schleife definieren? Es wird kompliziert für mich, zwei Schleifen zu haben.

Ich freue mich über Vorschläge.