Dear JMP community
I wrote a code the loop through all Site values (29 total) to extract fail probability and part_actions (Estimate Probability( 1 ), Estimate Quantile( 1 )) to one table. It is calculating fail probability and part_actions at 0.15 percent fail from a Weibull analysis. Following is the code. It keeps failing. Could you help me debug?
Names Default To Here( 1 );
dt = Data Table( "WeiBull Random Sampling_062606backup2" );
siteSummary = dt << Summary( Group( :Site ), N Rows( 1 ), Freq( "None" ) );
siteList = Column( siteSummary, 1 ) << get values;
Close( siteSummary, NoSave );
obj = dt << Life Distribution(
Perspective( Compare Groups ),
Y( :part_action ),
Grouping( :R_ind ),
Censor( :follow_censor ),
Censor Code( 0 ),
Label( :BOT ID ),
Confidence Interval Method( Wald ),
Interval Type( Pointwise ),
Fit Distribution( "Weibull" ),
Select Distribution( Distribution, Weibull ),
Select Scale( Nonparametric ),
Tabbed Report( 0 ),
Show Quantile Functions( 1 ),
Select Distribution( Quantile, Weibull ),
Estimate Probability( 1 ),
Estimate Probability( Compute( [150000] ) ),
Estimate Quantile( 1 ),
Estimate Quantile( Compute( [0.15] ) ),
SendToEmbeddedScriptable(
Dispatch( {"Individual Group", "Life Distribution R_ind=no"},
{Y( :part_action ), Censor( :follow_censor ), Censor Code( 0 ),
Label( :BOT ID ), <
<FIT weibull=""></FIT>
Puoi mantenere la linea
obj[i] << Close Window;
dall'interruzione dell'esecuzione inserendola in una funzione Try().
try(obj[i] << Close Window);
Hai provato a usare Crea tabella dati combinata invece di Crea in tabella dati? Potresti combinarlo con Opzioni di gruppo (Restituisci gruppo(1)) all'interno dell'avvio della piattaforma per ottenere un singolo oggetto invece di un elenco.
Ecco un esempio che utilizza Bivariata e ottiene i risultati dalla casella della tabella sotto Fit Mean
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
obj = dt << Bivariate(
Y(:weight),
X(:height),
Fit Mean({Line Color({230, 159, 0})}),
By(:age),
SendToReport(Dispatch({}, "Fit Mean ", OutlineBox, {Close(0)})),
Group Options(Return Group(1))
);
res = Report(obj)[OutlineBox("Fit Mean "), Table Box(1)] << Make Combined Data Table;
obj << Close Window;