Hallo,
Ich habe ein Skript, das eine bivariate Analyse enthält, möchte jedoch nur die Statistiktabelle zur linearen Anpassung anzeigen und das Diagramm selbst ausblenden.
this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"Time (Months)" ),
By( :"Lot Number" ),
Fit Line,
Invisible
)
Wie Sie sehen, habe ich die Bedingung „Unsichtbar“ in Bivariate() aufgenommen, aber das Diagramm wird immer noch in meiner JRN-Datei angezeigt und ich weiß nicht genau, wie ich es loswerde.
Hallo,
Ich verwende die Funktion „Bivariat“ nur, um lineare Anpassungsstatistiken für mein Hauptdiagramm zu generieren. Ich verwende das V-Listenfeld und das H-Listenfeld, um mit dem Graph Builder ein Diagramm zu erstellen, und bivariiere dann, um die lineare Anpassungsstatistik für jede Losnummer in einem H-Listenfeld neben dem Diagramm zu generieren. Jedem Graph Builder-Diagramm können bis zu 20–30 Bivariaten zugeordnet sein.
Wenn Sie eine bessere Alternative vorschlagen können, würde ich es gerne hören! Unten sehen Sie ein Beispiel meines Skripts. Es tut mir leid, wenn es verwirrend ist. Ich musste bestimmte Dateipfade und Spaltennamen ausblenden.
// Generating Graphs
setup = Function({dt}, {Default Local},
dt = Open ( "file.JMP" );
dt << Select Where(:"column example" == "string example" );
cfg1 = EvalList({dt << Data View, { "col1", "col2", "col3", "coln"}});
EvalList({cfg1});
);
build_graphs = Function({cfgs}, {Default Local},
win = New Window( "window", vlb = V List Box() );
ncfg = NItems(cfgs);
for(i = 1, i <= ncfg, i++,
{this_dt, this_cols} = cfgs[i];
ncols = NItems(this_cols);
for(j = 1, j <= ncols, j++,
vlb << Append(H List Box (
this_dt << Graph Builder(
Show Control Panel( 0 ),
Size( 600, 400),
Variables(
X( :"X axis" ),
Y( Column(this_dt, this_cols[j]) ),
Overlay( :"overlay" )
),
Elements(
Points( X, Y, Legend(12) )
),
SendToReport(
Dispatch(
{},
"",
ScaleBox,
{Format( "Fixed Dec", 10, 0 ), Min(0), Max(50), Inc(6),
Minor Ticks(0)}
)
)
),
this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"X axis" ),
By( :"overlay" ),
Fit Line,
SendToReport( Dispatch( {}, "", ListBox, {Visibility( "Collapse" )} ) )
)
));
)
);
win
);
dt = Open ( "file.JMP" );
cfgs = setup(dt);
Show(cfgs);
win = build_graphs(cfgs);
Show(win);
win << Save Journal("file.jrn", embed data(1));
Danke für deinen Vorschlag.
Ich habe auch eine alternative Lösung gefunden, die ich in Bivariate() schreiben kann.
SendToReport( Dispatch( {}, "", ListBox, {Visibility( "Collapse" )} ) )Die obige Zeile verbirgt das Feld mit dem bivariaten Diagramm.
biv = this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"Time (Months)" ),
By( :"Lot Number" ),
Fit Line,
Invisible
);
biv rep = biv << Report;
// one way
biv rep[PictureBox(1)] << Delete;
// other way
biv rep[PictureBox(1)] << Visibility( "Collapse" );