Pvalues 테이블을 Response Screening의 새 데이터 테이블에 추가해야하기 때문에 다소 길을 잃었습니다. 내 스크립트에 빠진 것이 있습니까? 이것에 도움이 필요합니다. 감사!
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) );
);
당신은 당신이 원하는 것에 아주 가깝습니다. 일치하지 않는 "()"이 있으며 연결 명령문이 For () 루프 내에 없습니다. 아래는 코드를 전체 작업 예제로 재 작업 한 것입니다. 나는 또한 당신에게 더 유익한 결과를 줄 것이라고 믿는 두 번째 버전을 추가했습니다.
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 ) );