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.
Choose Language Hide Translation Bar
agonzales2021
Level III

Range slider to control axis range of graph

A loop generates several graph builders with no particular name. I wanted to make a range slider to allow me to change the X axis range of ALL graphs in the journal (which all have the same range) but I'm not sure how to do that.

1 ACCEPTED SOLUTION

Accepted Solutions
txnelson
Super User

Re: Range slider to control axis range of graph

The easiest way to do this would be to open a Global Data Filter and select the X axis variable as the filter variable.  It will set up a slider that will allow you to change the range.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\big class.jmp" );
dt:age << modeling type( "continuous" );
gb1 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :height ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
gb2 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :weight ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);

dt << Data Filter(
	Location( {780, 189} ),
	Mode( Show( 1 ), Include( 1 ) ),
	Add Filter( columns( :age ) )
);

If you want to develop your you can setup a Slider Box to change the Min and Max values of the you can setup something like this:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\big class.jmp" );
dt:age << modeling type( "continuous" );
gb1 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :height ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
gb2 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :weight ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
slidervar = Report( gb1 )[axisbox( 1 )] << get min;
slidervar2 = Report( gb1 )[axisbox( 1 )] << get max;
New Window( "Example",
	Panel Box( "Slider Box",
		H List Box(
			sb = Slider Box(
				Report( gb1 )[axisbox( 1 )] << get min,
				Report( gb1 )[axisbox( 1 )] << get max,
				slidervar,
				Report( gb1 )[axisbox( 1 )] << Min( slidervar );
				Report( gb2 )[axisbox( 1 )] << Min( slidervar );
			),
			sb2 = Slider Box(
				Report( gb1 )[axisbox( 1 )] << get min,
				Report( gb1 )[axisbox( 1 )] << get max,
				slidervar2,
				Report( gb1 )[axisbox( 1 )] << Max( slidervar2 );
				Report( gb2 )[axisbox( 1 )] << Max( slidervar2 );
			)
		)
	)
);

 You can also add a graphics script to each of the Graph Builders, that detects changes in the range and origin of the AxisBox(1), and then when a change is detected, copy the AxisBox(1) settings from the graph where the change is detected, to each of the other graphs.  Obviously, this is more complex, however, it does have the advantage of not having to have a separate window with a slider in it.

Jim

View solution in original post

6 REPLIES 6
txnelson
Super User

Re: Range slider to control axis range of graph

The easiest way to do this would be to open a Global Data Filter and select the X axis variable as the filter variable.  It will set up a slider that will allow you to change the range.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\big class.jmp" );
dt:age << modeling type( "continuous" );
gb1 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :height ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
gb2 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :weight ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);

dt << Data Filter(
	Location( {780, 189} ),
	Mode( Show( 1 ), Include( 1 ) ),
	Add Filter( columns( :age ) )
);

If you want to develop your you can setup a Slider Box to change the Min and Max values of the you can setup something like this:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\big class.jmp" );
dt:age << modeling type( "continuous" );
gb1 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :height ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
gb2 = dt << Graph Builder(
	Size( 528, 448 ),
	Show Control Panel( 0 ),
	Variables( X( :age ), Y( :weight ) ),
	Elements( Points( X, Y, Legend( 5 ) ) )
);
slidervar = Report( gb1 )[axisbox( 1 )] << get min;
slidervar2 = Report( gb1 )[axisbox( 1 )] << get max;
New Window( "Example",
	Panel Box( "Slider Box",
		H List Box(
			sb = Slider Box(
				Report( gb1 )[axisbox( 1 )] << get min,
				Report( gb1 )[axisbox( 1 )] << get max,
				slidervar,
				Report( gb1 )[axisbox( 1 )] << Min( slidervar );
				Report( gb2 )[axisbox( 1 )] << Min( slidervar );
			),
			sb2 = Slider Box(
				Report( gb1 )[axisbox( 1 )] << get min,
				Report( gb1 )[axisbox( 1 )] << get max,
				slidervar2,
				Report( gb1 )[axisbox( 1 )] << Max( slidervar2 );
				Report( gb2 )[axisbox( 1 )] << Max( slidervar2 );
			)
		)
	)
);

 You can also add a graphics script to each of the Graph Builders, that detects changes in the range and origin of the AxisBox(1), and then when a change is detected, copy the AxisBox(1) settings from the graph where the change is detected, to each of the other graphs.  Obviously, this is more complex, however, it does have the advantage of not having to have a separate window with a slider in it.

Jim
agonzales2021
Level III

Re: Range slider to control axis range of graph

Jim,

 

but I noticed you individually named all of your graph builder objects.

 

As I was saying in my question, currently my program works by creating them in a loop so they are not called variable names. Because of this, I don't know how to refer to the Report. 

txnelson
Super User

Re: Range slider to control axis range of graph

just capture the pointer to each display object into a list, and then you can access each of them by referencing each by going back through the list.

Jim
agonzales2021
Level III

Re: Range slider to control axis range of graph

Okay so I have a function that makes my graphs.

You're saying make an empty list like graphslist = {};

 

Then in the function,

 

call the graph builder some variable like a = table << Graph builder();

Then insert into (graphslist, a);

Is this what you mean?

txnelson
Super User

Re: Range slider to control axis range of graph

You got it.

Jim
agonzales2021
Level III

Re: Range slider to control axis range of graph

Awesome! And to get it to be a range slider I did the following:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\big class.jmp" );
dt:age << modeling type( "continuous" );
gb1 = dt << Graph Builder(
Size( 528, 448 ),
Show Control Panel( 0 ),
Variables( X( :age ), Y( :height ) ),
Elements( Points( X, Y, Legend( 5 ) ) )
);
gb2 = dt << Graph Builder(
Size( 528, 448 ),
Show Control Panel( 0 ),
Variables( X( :age ), Y( :weight ) ),
Elements( Points( X, Y, Legend( 5 ) ) )
);

 

slidervar = Report( gb1 )[axisbox( 1 )] << get min;
slidervar2 = Report( gb1 )[axisbox( 1 )] << get max;


New Window( "Example",
Panel Box( "Slider Box",
H List Box(
rsb = Range Slider Box(
Report( gb1 )[axisbox( 1 )] << get min, Report( gb1 )[axisbox( 1 )] << get max, slidervar, slidervar2,
(
Report( gb1 )[axisbox( 1 )] << Min( slidervar );
Report( gb1 )[axisbox( 1 )] << Max( slidervar2 );
Report( gb2 )[axisbox( 1 )] << Min( slidervar );
Report( gb2 )[axisbox( 1 )] << Max( slidervar2 );
);
)
)
)
);

 

 

And with that I was able to do what I needed to for my own script! Jim, thank you so much!