Ich bin irgendwie verloren, weil ich die Pvalues-Tabelle an eine neue Datentabelle aus dem Response Screening anhängen muss. An meinem Skript scheint etwas zu fehlen? Benötigen Sie Hilfe dabei. Vielen Dank!
For( i = 1, i <= N Items( new_b ), i++,
rsq = cor_tab << Response Screening(
Y( Column( cor_tab, new_t[i] ) ),
X( Column( cor_tab, ref_t[i] ) )
)
pv = data table("PValues");
newdt << concatenate( datatable(pv), append to first table(1) );
);
Sie sind ziemlich nah an dem, was Sie brauchen. Sie haben ein nicht übereinstimmendes "()" und Ihre Verkettungsanweisung befindet sich nicht in der For () - Schleife. Im Folgenden finden Sie eine Überarbeitung Ihres Codes in ein voll funktionsfähiges Beispiel. Ich habe auch eine zweite Version hinzugefügt, von der ich glaube, dass sie Ihnen informativere Ergebnisse liefert.
Names Default To Here( 1 );
cor_tab = Open( "$SAMPLE_DATA/semiconductor capability.jmp" );
// Build the New_t and Ref_t lists
allCols = dt << get column names( continuous );
// Place every other column in the new_t and ref_t
new_t = {};
ref_t = {};
For( i = 1, i <= N Items( allCols ), i++,
If( Mod( i, 2 ) == 0,
Insert Into( ref_t, allCols[i] ),
Insert Into( new_t, allCols[i] )
)
);
dtFinal = New Table( "Together" );
For( i = 1, i <= N Items( new_t ), i++,
rsq = cor_tab << Response Screening(
Y( Column( cor_tab, new_t[i] ) ),
X( Column( cor_tab, ref_t[i] ) )
);
dtFinal << concatenate( Data Table( "PValues"), append to first table( 1 ) );
Close( Data Table( "PValues" ), nosave );
);
// Or if you did it this way, you would get more informative results table
cor_tab << Response Screening( Y( eval(new_t) ), X( eval(ref_t) ), Paired X and Y( 1 ) );