955429_es-ES

liliconcom

Codificación JSL

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>

<LINGO-LABS id="lingo-labs-955429" slang="en-US" mode="CREATE"> <LINGO-LABEL>Automatización y secuencias de comandos</LINGO-LABEL> </LINGO-LABS> Re: Codificación JSL

El error es el siguiente:

Re: Codificación JSL

Puedes mantener la línea

obj[i] << Close Window;

evitando así la interrupción de la ejecución al colocarla en una función Try().

try(obj[i] << Close Window);

Re: Codificación JSL

¿Has probado a usar la opción «Crear tabla de datos combinada» en lugar de «Crear tabla de datos»? Podrías combinarla con la opción «Agrupar opciones (Return Group(1))» dentro del lanzamiento de la plataforma para obtener un único objeto en lugar de una lista.

Aquí hay un ejemplo usando Bivariado y obteniendo los resultados del cuadro de tabla en Ajustar media

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;