213377_fr-FR

liliconcom

Désactiver les lisseurs via JSL

Salut,

J'essaie d'écrire une fonction de générateur de graphe à usage général pour traiter différentes conditions de graphe (avec ou sans incrustation, avec ou sans retour à la ligne, etc.). Le script suivant fonctionne pour mes trois cas, mais en plus fluide ajustement linéaire ou courbe) est activé pour les premier et deuxième graphiques, et non le troisième.

 

Je ne pense pas que je fasse quoi que ce soit pour activer le (s) lissage (s) dans mon script. Ma question est la suivante: comment puis-je désactiver le ou les filtres via le script?

Merci,

Facture

 

Clear Globals();
Names Default To Here( 1 );

//Open the file
myFile = Pick File( "Choose File" );
dtIn = Open( myFile );

//Extract Serial number
for(i=1, i<=nrow(dtIn), i++,
 dtIn:SERIAL_NUMBER[i] = regex(dtIn:SERIAL_NUMBER[i], "\w{8}");
);

dtIn:PE_COUNTS_DIE_LOGICAL_DIE_INDEX << set modeling type("Nominal");


DoGraph = function({dt, xCol, yCols, wrapCol, overlayCol},
 {default local},

 current data table(dt);
 myExpr = expr(Graph Builder(
   Size( 528, 490 ),
   Show Control Panel( 0 ),
  )
 );
 varExpr = expr(Variables());
 elementExpr = expr(Elements());
 pointsExpr = expr(Points( X ));

 xExpr = expr(X(as column(expr(xCol))));
 insert into(varExpr, name expr(xExpr), 1);
 
 if( is string(yCols),
   yExpr = expr(Y(:expr(yCols)));
   insert into(varExpr, name expr(yExpr), 2);
   nextIndex = 3;
  ,
  is list(yCols),
   nYCols = n items(yCols);
   for(i=1, i<=nYCols, i++,
    yStr = yCols[i];
    yExpr = expr(Y(as column(expr(yStr)), Position( 1 )));
    yExpr1 = eval expr(yExpr);
    insert into(varExpr, name expr(yExpr1), i+1);
    
    yPointExpr = expr(Y(expr(i)));
    yPointExpr1 = eval expr(yPointExpr);
    insert into(pointsExpr, name expr(yPointExpr1), i+1);

   );
   insert into(elementExpr, name expr(pointsExpr));
   nextIndex = nYCols + 2;
  ,
  Throw("Y must be string or list of strings");
 );

 if(length(wrapCol),
  wrapExpr = expr(Wrap(:expr(wrapCol)));
  insert into(varExpr, name expr(wrapExpr), nextIndex);
  nextIndex++;
 );
 
 if(length(overlayCol),
  overlayExpr = expr(Overlay(:expr(overlayCol)));
  insert into(varExpr, name expr(overlayExpr), nextIndex);
  nextIndex++;
 );

 insert into(myExpr, name expr(varExpr), 3);
 insert into(myExpr, name expr(elementExpr), 4);
 myExpr1 = expr(eval expr(myExpr));
 eval(myExpr1);
);

xCol = "DRIVE_LEVEL_DATA_PE_AVE_DL_AVE";
yCol = "DIE_AGE_DIE_AGE";

hpList = {
 "DRIVE_VITALS_AGE_SBS_THAT_PERFORMED_AGE_MEASUREMENT", 
 "DRIVE_VITALS_AGE_SBS_THAT_WENT_INTO_THE_HOLDING_PEN",
 "DRIVE_VITALS_AGE_OCCURANCES_OF_SBS_SKIPPED_THE_HOLDING_PEN_BECAUSE_IT_WAS_FULL",
 "DRIVE_VITALS_AGE_SBS_THAT_ABORTED_AGE_MEASUREMENT"
};

DoGraph(dtIn, xCol, "DIE_AGE_DIE_AGE", "SERIAL_NUMBER", "PE_COUNTS_DIE_LOGICAL_DIE_INDEX");
DoGraph(dtIn, xCol, "DRIVE_LEVEL_DATA_DIE_AGE_DL_AVE", "SERIAL_NUMBER", "");
DoGraph(dtIn, xCol, hpList, "SERIAL_NUMBER", "");

Re: Désactiver Smoothers via JSL

Vous pouvez manipuler les préférences du générateur de graphes pour que le lisseur n'apparaisse jamais. Ou vous pourriez faire ce genre de chose:

NamesDefaultToHere(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
gb = dt << Graph Builder(
      Show Control Panel( 0 ),
      Variables( X( :weight ), Y( :height ) ),
      Elements( Points( X, Y, Legend( 5 ) ), Smoother( X, Y, Legend( 6 ) ) )
     );

Wait(2);
gbb = Report( gb )[Graph Builder Box( 1 )];
Print(gbb << Get Elements( 1, 1 ));
gbb << removeElement(1, 1, 2);
Print(gbb << Get Elements( 1, 1 ));

Re: Désactiver Smoothers via JSL

Bonjour Ian,

 

Merci pour votre réponse.  Idéalement, je voudrais éviter que le lisseur soit en premier lieu.  J'ai essayé de comprendre comment manipuler les préférences du générateur de graphique, mais le seul élément d'index de scrutation associé que j'ai trouvé était "Ignorer les préférences de la plateforme (1)", et cela ne semble pas avoir d'impact.  Une chose qui me préoccupe est que le comportement par défaut varie entre mes trois cas.

 

Des suggestions sur quelle synataxie de script peut accéder aux préférences du générateur de graphique?

 

Merci,

Facture

Re: Désactiver Smoothers via JSLY a-t-il ironie que j'ai mal orthographié la syntaxe? Quoi qu’il en soit, j’ai pu utiliser l’interface graphique de JMP pour modifier les préférences du générateur de graphes, mais d’autres finiront par utiliser mon code. Il faudrait donc que le comportement des préférences soit scripté afin que différents utilisateurs obtiennent le même résultat.Re: Désactiver Smoothers via JSL

J'ai trouvé la solution miracle après un peu de fouille:

 

définir les préférences de la plate-forme (générateur de graphique (Continuous Smoother (0)));

 

Merci de m'avoir orienté dans la bonne direction, Ian.