스플라인- 레전드 및 필터 문제안녕,
스크립트를 실행하면 스플라인과 범례 색상이 일치합니다. 그런 다음 필터를 클릭하면 범례 색상은 바뀌지만 스플라인은 동일하게 유지되어 데이터 혼란이 발생합니다.
필터에 관계없이 레전드와 스플라인에 같은 색상을 설정하는 방법은 무엇입니까?
에디션에서 미리 필터링을 하면 스플라인이 다른 필터에 적용되지 않습니다. 어떻게 해야 하나요?
관련 스크립트를 첨부했습니다.
</CODE></PRE>
<P> </P>
<PRE><CODE class=" language-jsl">Lineup Box(
abc = Bivariate(
Y( :total_defects ),
X( :start_date ),
Automatic Recalc( 1 ),
Local Data Filter(
Conditional,
Add Filter(
columns( :CU_NC, :ceid, :entity ),
Where( :CU_NC == "NC" ),
Where( :ceid == "TNG" ),
Display( :entity, List Display ),
)
),
SendToReport(
Dispatch( {}, "1", ScaleBox, {Label Row( Label Orientation( "Angled" ) )} ),
Dispatch( {}, "2", ScaleBox,
{Min( -5 ), Max( 250 ), Inc( 7 ), Minor Ticks( 1 ),
Add Ref Line( 30, "DashDot", "Red", "UCL", 2 ), Label Row( Show Major Grid( 1 ) )}
),
Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 800, 250 )} ),
Dispatch( {}, "Bivar Plot", FrameBox,
{Frame Size( 800, 250 ), Row Legend(
entity,
Color( 1 ),
Color Theme( "JMP Default"(1) ),
Marker( 0 ),
Marker Theme( "" ),
Continuous Scale( 0 ),
Reverse Scale( 0 ),
Excluded Rows( 0 )
)}
)
),
);
abc << group by( :entity );
abc << fit spline( 0.1, Standardized, {Line Width( 2 ), Report( 0 )} );
)기본 데이터 분석 및 모델링Re: 스플라인- 레전드 및 필터 문제안녕,
제가 말하고자 했던 것은 처음에 구성된 필터를 제거하면 다른 데이터에 대한 스플라인이 없다는 것입니다.
이 문제를 해결하기 위해 무엇을 할 수 있나요?
Re: 스플라인- 레전드 및 필터 문제필터 변경 핸들러를 사용하여 스크립팅해야 할 것 같습니다. 해당 라인은 행 상태/값 색상 열 속성을 따르지 않기 때문입니다(또한 단일 지점만 있는 경우 라인이 맞지 않습니다). "다른 필터에 작동하지 않는다"는 말이 무슨 뜻인지 잘 모르겠습니다.
필터 변경 핸들러의 작동 방식으로 인해 이 옵션은 그다지 안정적이지 않을 수 있지만 제가 처음 생각해 낸 아이디어는...
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
Column(dt, "age") << Set Property(
"Value Colors",
{12 = -13912408, 13 = -4042310, 14 = -4354269, 15 = -13400361, 16 = -2668175, 17 = -10628061}
);
nw = new window("",
Lineup Box(
biv = dt << Bivariate(
Y(:height),
X(:weight),
Automatic Recalc(1),
SendToReport(
Dispatch({}, "1", ScaleBox, {Label Row(Label Orientation("Angled"))}),
Dispatch(
{},
"2",
ScaleBox,
{Min(-5), Max(250), Inc(7), Minor Ticks(1), Add Ref Line(30, "DashDot", "Red", "UCL", 2),
Label Row(Show Major Grid(1))}
),
Dispatch({}, "Bivar Plot", FrameBox, {Frame Size(800, 250)}),
Dispatch(
{},
"Bivar Plot",
FrameBox,
{Frame Size(800, 250), Row Legend(
age,
Color(1),
Color Theme(""),
Marker(0),
Marker Theme(""),
Continuous Scale(0),
Reverse Scale(0),
Excluded Rows(0)
)}
)
)
);
)
);
ldf = biv << Local Data Filter(
Conditional,
Add Filter(
columns(:sex, :name, :age),
Where(:sex == "M")
)
);
summarize(dt, groups = by(:age)); // based on your By column
fitlines = Function({a},
For(i = 1, i <= N Items(groups), i++,
biv << (Curve[1] << remove fit);
);
biv << group by(:age);
biv << fit spline(0.1, Standardized, {Line Width(2), Report(0)});
wait(0);
);
ss = ldf << Make Filter Change Handler(fitlines);
fitlines(1);
Write();