dt0 = Open( "$SAMPLE_DATA/Airline Delays.jmp" );
step1= dt0 << Concatenate(dt0, dt0, dt0, dt0, dt0, dt0, dt0, dt0);
dt = step1 << Concatenate(step1,step1,step1,step1);
SubsetLinked = dt << Select Where( :Airline == "Delta" ) << Data View;
SubsetWithoutLink = SubsetLinked<< Subset( All rows, Selected columns only( 0 ) );
gb1 = dt << Graph Builder(
Summary Statistic( "Median" ),
Graph Spacing( 4 ),
Variables( X( :Airline ), Y( :Arrival Delay ) ),
Elements( Box Plot( X, Y, Legend( 4 ) ) )
);
gb2 = SubsetLinked << Graph Builder(
Summary Statistic( "Median" ),
Graph Spacing( 4 ),
Variables( X( :Airline ), Y( :Arrival Delay ) ),
Elements( Box Plot( X, Y, Legend( 4 ) ) )
);
gb3 = SubsetWithoutLink << Graph Builder(
Summary Statistic( "Median" ),
Graph Spacing( 4 ),
Variables( X( :Airline ), Y( :Arrival Delay ) ),
Elements( Box Plot( X, Y, Legend( 4 ) ) )
);
gb1 << Save Interactive HTML( "$TEMP/fullTable.html" );
gb2 << Save Interactive HTML( "$TEMP/linkedSubset.html" );
gb3 << Save Interactive HTML( "$TEMP/SubsetWithoutLink.html" );