cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
JMP is taking Discovery online, April 16 and 18. Register today and join us for interactive sessions featuring popular presentation topics, networking, and discussions with the experts.
vritti
Level I

JSL Create Variability Chart from Tabulate table

Hi All

I have the following script for issue presentation only:

I can't understand what is wrong - why chart not displayed.

dt = Open( "$SAMPLE_DATA/Hurricanes.jmp" );

tdt = dt<<

Tabulate(

  Add Table(

  Column Table(

  Analysis Columns( :Atmospheric Pressure ),

  Statistics( N, Mean )

  ),

  Row Table( Grouping Columns( :Name, :Name( "Wind (Knots)" ) ) )

  )

);

pivotTable = tdt << Make Into Data Table;

tbName = dt << get name() || " - Pivot Table";

pivotTable << set name( tbName );

Variability Chart(

  Y( :Name( "Mean(Atmospheric Pressure)" ) ),

  X( :Name( "Wind (Knots)" ), :Name ),

  Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),

  Process Variation( 0 ),

  Connect Cell Means( 1 ),

  Std Dev Chart( 0 ),

  SendToReport(

  Dispatch(

  {"Variability Chart for Mean(Atmospheric Pressure)"},

  "Variability Chart",

  FrameBox,

  {Grid Line Order( 5 ), Reference Line Order( 6 )}

  )

  )

);

1 REPLY 1
pmroz
Super User

Re: JSL Create Variability Chart from Tabulate table

You need to make the pivot table the current data table.  The variability chart platform is trying to run from the hurricanes table instead.  This code works:

dt = Open( "$SAMPLE_DATA/Hurricanes.jmp" );

tdt = dt << Tabulate(

    Add Table(

        Column Table( Analysis Columns( :Atmospheric Pressure ), Statistics( N, Mean ) ),

        Row Table( Grouping Columns( :Name, :Name( "Wind (Knots)" ) ) )

    )

);

pivotTable = tdt << Make Into Data Table;

tdt << close window;

tbName = dt << get name() || " - Pivot Table";

pivotTable << set name( tbName );

current data table(pivottable);

Variability Chart(

    Y( :Name( "Mean(Atmospheric Pressure)" ) ),

    X( :Name( "Wind (Knots)" ), :Name ),

    Analysis Type( Name( "Choose best analysis (EMS REML Bayesian)" ) ),

    Process Variation( 0 ),

    Connect Cell Means( 1 ),

    Std Dev Chart( 0 ),

    SendToReport(

        Dispatch(

            {"Variability Chart for Mean(Atmospheric Pressure)"},

            "Variability Chart",

            FrameBox,

            {Grid Line Order( 5 ), Reference Line Order( 6 )}

        )

    )

);