417485_en-US

liliconcom

integrate radio box with bivariate plot

Hi

Using the below script to dynamically control bivariate plot upon user choice.

The user chooses 'product' type out of a list presented in a radio box, and the chosen product will be then used as a 'By' argument in the bivariate plot.

 

I managed to create the new window containing radio box and plot but it is not interactive.

Hope you can help!

 

summarize(unique_values=by("PRODUCT@STARTS"));


my_1_script = expr(
    Bivariate(
   Y(:Name(
     "SPCRAW@WAFER@MEAN@ONTFE.HM_FRAC_LOT_2PT_DYN.74.DER@ML=2PT_DYN_A;PP=2PT_MEAN@188426"
    )
   ),
   X(:Name( "END_TIME@CHAMBER@NTSC@Process-1@ETCHER@163096" ) ),
   
   By( cat<< Get Selected ),
   
   GroupBy( :group ),
   Fit Spline( 0.1, Standardized, {Line Width( 2 )} ),
   UnGroup;
   
   Fit Where(:group == "D1D",
    Fit Spline(0.1,Standardized,{Line Color( "Black" ), Line Width( 4 )})); 
    
   SendToReport(
    Dispatch(
     {},
     "Bivar Plot",
     FrameBox,
     {Frame Size( 493, 277 ),
     Row Legend(
      chamber,
      Color( 1 ),
      Color Theme( "JMP Default" ),
      Marker( 0 ),
      Marker Theme( "" ),
      Continuous Scale( 0 ),
      Reverse Scale( 0 ),
      Excluded Rows( 0 )
     )}
    )
    
   )
  )
   );



my_win = New Window( "DEPOP FRAC - Bivariate",
 HListBox(
    LineUpBox(ncol(1), 
     PanelBox("Product", 
     Outline Box( "Select Product", cat = Radio Box( unique_values, width( 200 ), gb << delete; my_win << append( gb = my_1_script ) ))
    ), //end PanelBox
   gb = my_1_script)))

Data TableGraphicsScriptingRe: integrate radio box with bivariate plot

I think this will provide you with what you need

Names Default To Here( 1 );
Summarize( unique_values = by( "PRODUCT@STARTS" ) );

my_1_script = Expr(
 Bivariate(
  Y(
   :Name(
    "SPCRAW@WAFER@MEAN@ONTFE.HM_FRAC_LOT_2PT_DYN.74.DER@ML=2PT_DYN_A;PP=2PT_MEAN@188426"
   )
  ),
  X( :Name( "END_TIME@CHAMBER@NTSC@Process-1@ETCHER@163096" ) ), 
   
  By( As Column( catSelected ) ), 
   
  GroupBy( :group ),
  Fit Spline( 0.1, Standardized, {Line Width( 2 )} ),
  UnGroup;
   
  Fit Where(
   :group == "D1D",
   Fit Spline( 0.1, Standardized, {Line Color( "Black" ), Line Width( 4 )} )
  ); 
    
  SendToReport(
   Dispatch(
    {},
    "Bivar Plot",
    FrameBox,
    {Frame Size( 493, 277 ), Row Legend(
     chamber,
     Color( 1 ),
     Color Theme( "JMP Default" ),
     Marker( 0 ),
     Marker Theme( "" ),
     Continuous Scale( 0 ),
     Reverse Scale( 0 ),
     Excluded Rows( 0 )
    )}
   )
    
  );
 )
);

my_win = New Window( "DEPOP FRAC - Bivariate",
 H List Box(
  Lineup Box( N Col( 1 ),
   Panel Box( "Product",
    Outline Box( "Select Product",
     cat = Radio Box(
      unique_values),
     button box("OK",
      catSelected = cat << get selected;
      my_win << close window;
      my_1_script;
     )
    )
   ) //end PanelBox
  )
 )
);

 

Re: integrate radio box with bivariate plot

Thanks! Working perfectly.

Can you recommend on were can I learn more of this type of JSL scripting?

Re: integrate radio box with bivariate plot

You can IM me -- I'm the creator of the DMFE addin

Re: integrate radio box with bivariate plot

Hi Thanks for helping! 

I ran your suggested script but i received an error:

 

This error message pops up when i click on different options from the radio box. I tried different options but all led to this error message.

 

Do you know how can it be fixed?

 

Thanks!!

Re: integrate radio box with bivariate plot

You might want to curate your examples and not have company specific names -- it also helps to use the example data tables that JMP provides to more easily work with people here.

 

That being said, here is a quick example I put together that functionally does what you're asking.  Note that the extra bits with the self namespace and such are there for scope control.  If you're doing much with interactive UI's such as this I recommend creating a library that can automatically control the scope of your scripts with meta-programming.  It is _much_ easier and more intuitive.

 

/* interactive graph */

self = New Namespace();
self:table = Current Data Table();
self:by group column = "PRODUCT@STARTS";
self:response = "RESPONSE_NAME";
self:time  = "TIME_COLUMN";
self:group = "group";
self:items = Associative Array( Column( self:table, self:by group column ) ) << Get Keys;

Eval( Eval Expr( 

self:window = New Window( "Graph Example",
 <<ON close=""></ON>