formule cumulative d'analyse de récurrence (anciennement codage JSL)Salut tout le monde
Je souhaite enregistrer la formule cumulative d'un modèle pour chaque niveau de cause dans un modèle d'analyse de récurrence. Voici le code que j'ai utilisé.
ra = Recurrence Analysis(
Y( :age ),
Label( :BOT ID ),
Cost( :Censor ),
Grouping( :Bot Series ),
Event Plot( 0 ),
Fit Model(
Scale Effects( :Bot Series ),
Shape Effects( :Bot Series ),
Run Model,
Model Type( "Proportional Intensity Poisson Process" )
)
);
// Get fitted recurrence model object
fit = Report(ra)[OutlineBox("Fitted Recurrence Model")] << Get Scriptable Object;
// Save intensity and cumulative formulas from fit
intensity_col = fit << Save Intensity Formula;
cumul_col = fit << Save Cumulative Formula (
If( :Part Grouping2 == "Caster Assy-Left"",
full_formula
)
);
I have Part Grouping2 as Cause and there are 13 levels in Part Grouping2, I want to generate fit value for each level in Part Grouping2. I tried some code but did not work. In the code Part Grouping2 == "Caster Assy-Left" . That is just trying to use the formular for one Part Grouping2 level Caster Assy-Left. There are 13 total levels and I want to automate this so I don't need to repeat 13 times.
Thanks.
</CODE></P>
<DIV>
</DIV>
</LINGO-BODY>
<LINGO-LABS id="lingo-labs-912116" slang="en-US" mode="UPDATE">
<LINGO-LABEL>Automatisation et scriptage</LINGO-LABEL>
</LINGO-LABS>
<LINGO-SUB id="lingo-sub-912154" slang="en-US" mode="CREATE" translate="no">Re: Codage JSL</LINGO-SUB>
<LINGO-BODY id="lingo-body-912154" slang="en-US" mode="CREATE">
<P>Que cherchez-vous à extraire ou à faire au final ? Votre script générera les formules pour vous, qui semblent ressembler à ceci :</P>
<P><SPAN class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><SPAN class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><SPAN class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><SPAN class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><SPAN class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><SPAN class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><span class="lia-inline-image-display-wrapper" image-alt="jthi_0-1762581573217.png" style="width: 999px;"><img src="https://us.v-cdn.net/6038925/uploads/images/86635iE72CED4B36533B07/jthi_0-1762581573217.png" role="button" title="jthi_0-1762581573217.png" alt="jthi_0-1762581573217.png" /></span></SPAN></SPAN></SPAN></SPAN></SPAN></SPAN></P>
<PRE><CODE class=" language-jsl">Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Reliability/Bladder Cancer.jmp");
ra = dt << Recurrence Analysis(
Y(:Age),
Cost(:Cost),
Grouping(:Treatment Group),
Label(:Patient Number),
Fit Model(
Scale Effects(:Treatment Group),
Shape Effects(:Treatment Group),
Run Model,
Model Type("Proportional Intensity Poisson Process")
)
);
fit = Report(ra)[Outline Box("Fitted Recurrence Model")] << Get Scriptable Object;
intensity_col = fit << Save Intensity Formula;
cumul_col = fit << Save Cumulative Formula;
Re: Codage JSLSalut,
Merci pour votre réponse.
Je souhaite prédire les valeurs cumulées (nombre de réparations dans cette étude) 90 jours plus tard pour chaque machine. J'ai trouvé la solution.
Il me suffit d'utiliser « fit = Report(ra)[OutlineBox("Fitted Recurrence Model Cause= Caster Assay-Left)] << Get Scriptable Object; ». Ainsi, « Cause = » générera la formule pour le niveau de cause souhaité.
Pour automatiser ce processus pour 13 niveaux de cause, j'ai simplement créé une liste de causes et utilisé une boucle for pour parcourir chaque niveau.
Merci.
Re: Codage JSLVous utilisez la clause « Par colonne » ? Il est fort probable qu'une boucle ne soit pas nécessaire, mais c'est une bonne option. Assurez-vous simplement de ne pas écraser accidentellement des colonnes.
Si vous utilisez la fonction « Par colonne », la diffusion peut également fonctionner si elle répond à vos besoins.
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Reliability/Bladder Cancer.jmp");
ra = dt << Recurrence Analysis(
Y(:Age),
Cost(:Cost),
Grouping(:Treatment Group),
Label(:Patient Number),
Fit Model(
Scale Effects(:Treatment Group),
Shape Effects(:Treatment Group),
Run Model,
Model Type("Proportional Intensity Poisson Process")
),
By(:Cause of Death)
);
fit = Report(ra[1])[Outline Box("Fitted Recurrence Model")] << Get Scriptable Object;
fit << Broadcast(Save Intensity Formula);
fit << Broadcast(Save Cumulative Formula);
