다음 코드는 좋은 새 테이블을 만드는 데 도움이 되지만 파티션 창이 열린 상태에서 잘못된 채우기에 대해 하나만 선택할 수 있습니다. 파티션 화면이 열리길 원하지만 사용자는 나쁜 채우기에 대해 둘 이상의 리프 노드를 선택할 수 있으며 나머지는 좋은 채우기로 이동합니다. 이 작업을 수행하는 방법이 있습니까?
dt = Open("$SAMPLE_DATA\semiconductor capability.jmp");
filepath = "$Desktop";
nw = New window("part test",
V List Box(
obj = dt << Partition(
Y(:NPN1),
X(:PNP1, :PNP2, :PNP3, :PNP4, :NPN2, :NPN3, :NPN4),
Method("Decision Tree")
),
Button box("make splits",
make_splits_expr
);
)
);
obj << ShowGraph(0);
obj << SplitBest(4);
obj << Show Split Count(1);
obj << Show Split Prob(1);
make_splits_expr = Expr(
sel_rows = dt << Get Selected Rows;
If(N Items(sel_rows > 0),
dtTemp = dt << subset(invisible, rows(), selected columns(0));
Close(dtTemp, save(filepath || "\" || "badpopulation.jmp"));
dt << invert row selection;
sel_rows = dt << Get Selected Rows;
dtSEG = dt << subset(invisible, selected rows(1), selected columns(0));
Close(dtSEG, save(filepath || "\" || "goodpopulation.jmp"));
);
dt << Clear Selected;
);노란색으로 강조 표시된 노드를 잘못된 채우기로 선택하고 이 파티션 창을 열어 둔 상태에서 좋은 채우기로 휴식하고 결과에 만족하지 않으면 노드 선택을 변경할 수 있기를 원합니다.
그것을 가능하게 하는 방법이 있습니까?
