Ciao,
Ho uno script che include un'analisi bivariata, tuttavia vorrei che venga visualizzata solo la tabella delle statistiche di adattamento lineare e nascondere il grafico stesso.
this_dt << Bivariate(
Y( Column(this_dt, this_cols[j])),
X( :"Time (Months)" ),
By( :"Lot Number" ),
Fit Line,
Invisible
)
Come puoi vedere, ho incluso la condizione Invisible in Bivariate(), ma il grafico viene ancora visualizzato nel mio file JRN e non sono sicuro di come eliminarlo.
Ciao,
Sto usando la funzione Bivariata solo per generare statistiche di adattamento lineare per il mio grafico principale. Sto usando la casella di riepilogo V e la casella di riepilogo H per generare un grafico utilizzando il generatore di grafici, quindi Bivariate per generare le statistiche di adattamento lineare per ciascun numero di lotto in una casella di riepilogo H accanto al grafico. Ogni grafico del generatore di grafici può avere fino a 20-30 Bivariate associate.
Se puoi suggerire un'alternativa migliore, mi piacerebbe ascoltarla! Di seguito è riportato un esempio del mio script, scusa se crea confusione, ho dovuto nascondere percorsi di file specifici e nomi di colonne.
// 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));
Grazie per il tuo suggerimento.
Ho anche trovato una soluzione alternativa che posso scrivere all'interno di Bivariate().
SendToReport( Dispatch( {}, "", ListBox, {Visibility( "Collapse" )} ) )La riga sopra nasconde la casella contenente il grafico bivariato.
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" );