spline - problème de légende et de filtreSalut,
lorsque j'exécute mon script, les couleurs de la spline et de la légende correspondent, lorsque je clique ensuite sur le filtre, la couleur de la légende change mais la spline reste la même, ce qui entraîne une confusion dans les données.
comment définir la même couleur pour la légende et la spline quel que soit le filtre ?
en édition, lorsque je filtre à l'avance, la spline ne fonctionne pas pour les autres filtres, que puis-je faire ?
ci-joint le script pertinent.
</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 )} );
)Analyse et modélisation de données de baseRe: spline - problème de légende et de filtreSalut,
Je voulais dire que si je supprime le filtre qui a été initialement configuré (où) - il n'y a pas de spline pour les autres données.
Que peut-on faire pour y faire face ?
Re: spline - problème de légende et de filtreJe pense que cela nécessitera un script utilisant un gestionnaire de changement de filtre car ces lignes ne suivent pas les états de ligne / la propriété de colonne de couleur de valeur (de plus, s'il n'y a qu'un seul point, aucune ligne ne conviendra). Je ne suis pas sûr de ce que vous voulez dire par « ne fonctionne pas pour d'autres filtres » ?
Cette option n'est peut-être pas très robuste en raison du fonctionnement du gestionnaire de changement de filtre, mais la première idée que j'ai eue...
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();