JSL : Use a checkbox with the levels of a column

PersuasionCamel

Hello,

 

I hope you are doing well.

 

I have a question about the scripts of the checkboxes in JMP.

 

I have a data set with a "strength" variable, and I want to create a subset if the data set according to a checkbox presenting all the strengths in the data set. The aim is that the user check in the checkbox the strengths of interest and that the rows in the data set are selected according to the strengths checked in the checkbox. As the strengths are not necessary the same according to the data set,  I was wondering if it is possible to "extract" the unique values of strengths from the column and then to present the strengths in the checkbox in order to choose in the checkbox the strengths of interest. I want to have the script as general as possible to analyze all data sets with all possible strengths.

 

Thank you very much and have a nice day,

 

Jean

David_Burnham

An alternative example:

 

Names Default to Here( 1 );

// mock up data set with Strength
dt = New Table( "Strength",
	New Column( "Strength", "Character", "Nominal",
		Values( {"Intelligent", "Innovative", "Initiative", "Introvert", "Intelligent",
			"Innovative", "Initiative", "Introvert", "Intelligent", "Innovative",
			"Initiative", "Introvert"} )
	)
);

// get unique values from the strength column
summarize(dt,levels=by(:strength));

// construct a window containing checkboxes
NewWindow("Selection",
	BorderBox(top(20),bottom(20),left(20),right(20),
		VListBox(
			TextBox("Select values:"),
			here:cb = CheckBox(levels),
			SpacerBox(size(0,20)),
			ButtonBox("Create Subset",doSubset())
		)
	)
);

// define function to perform when button is cliccked

doSubset = function({},{default local},

		dt = current data table();
		dt << clear select;

		// get user selections
		selected = here:cb << get selected;
		
		// iterate over each of the selected values
		// and select the associated rows
		for each( {selection},selected,
			rows = dt << select  where(:Strength==selection,
				current selection("extend")
			);
		);
		// create a subset table
		dt << subset(
			selected rows(1),
			selected columns only(0)
		);
		dt << clear select;

);