로컬 데이터 필터를 사용하여 그래프를 변경하고 있는데, 각 "스위처"를 반복해서 파워포인트 슬라이드에 인쇄하고 싶습니다. JMP18에서 가능할까요?
열 전환기와 비슷한 아이디어를 사용할 수 있지만, 데이터 필터는 조작하기가 더 복잡하다는 점이 다릅니다. 아래는 한 가지 옵션입니다.
Names Default To Here(1);
dt = open("$SAMPLE_DATA/Big Class.jmp");
gb = dt << Graph Builder(
Size(525, 454),
Show Control Panel(0),
Variables(X(:weight), Y(:height), Overlay(:sex)),
Elements(Points(X, Y, Legend(9)), Line Of Fit(X, Y, Legend(11))),
Local Data Filter(
Add Filter(columns(:age), Display(:age, N Items(6)))
)
);
Summarize(dt, items = By(:age));
lbb = (Report(gb) << top parent)["Local Data Filter", ListBoxBox(1)];
pptx_loc = "$TEMP/powerpoint_test.pptx";
gb << Save Presentation(pptx_loc);
For(i = 1, i <= N Items(items), i++,
lbb << Clear Selection;
lbb << Set Selected(i);
gb << Save Presentation(pptx_loc, Append);
wait(0);
);
// Web(pptx_loc);
Write();
하지만 로컬 데이터 필터 대신 페이지를 사용하는 건 어떠세요? 훨씬 더 간단합니다.
Names Default To Here(1);
dt = open("$SAMPLE_DATA/Big Class.jmp");
gb = dt << Graph Builder(
Show Control Panel(0),
Variables(X(:weight), Y(:height), Overlay(:sex), Page(:age)),
Elements(Points(X, Y, Legend(9)), Line Of Fit(X, Y, Legend(11)))
);
pptx_loc = "$TEMP/powerpoint_test.pptx";
gb << Save Presentation(pptx_loc);
// Web(pptx_loc);
Write();
각 그래프를 JMP 저널에 저장하기만 하면 됩니다(ctrl>j). 저널에 모든 그래프 버전을 저장했으면 저널을 열고 PowerPoint로 내보내세요.