nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

How to retitle a subset data table based on the data filter selections used to create it

MarginalMouse87

Using code I found in this post discussion (Solved: How to get data selected by Data Filter () into a new data table (using JSL)? - JMP User Community; https://community.jmp.com/t5/Discussions/How-to-get-data-selected-by-Data-Filter-into-a-new-data-table/m-p/642343 ), I am able to choose specific age and sex combinations via the data filter and generate a subset table titled "Subset of Big Class" that contains only those desired rows. However, I would like to use the options checked in the data filter to title or rename the data file. For example, if I check age 13 and sex female, I would like to automatically name/title the table "Age 13 Sex F Subset of Big Class" or something similar. Unfortunately, I cannot figure out how to grab those values from the Data Filter or in the script.

Could someone please point me towards the right function, option, or syntax?

I could extract them from the resulting data itself I suppose, but I have to believe that there is a way to store those values "at the source".

JMP 17

Thank you!

using a data filter to subset table.jsl

Accepted answers

txnelson

Here is an example of creating a subset of a table that has been specified by the settings in a Data Filter, and the name of the new table is the Where Clause used to create the table. It creates the upon closing of the Data Filter if there have been selections in the filter.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

nw = New Window( "Select Parameters", 
	//<<modal,
	<<return result, 
	
	obj = dt << Data Filter(
		//Location( {3000, -600} ),
		Width( 315 ),
		Conditional,
		Add Filter(
			columns( :age, :sex ),
			Display( :Col2, "Check Box Display" ),
			Display( :Col3, "Check Box Display" ),
			Display( :Parameter, N Items( 20 ), "Check Box Display", Find( Set Text( "" ) ) )
		)
	)
);
nw << on close(<BR />   theClause = obj << Get Where Clause;
	If( theClause != "",
		dt << subset(
			selected columns( 1 ),
			selected rows( 1 ),
			output table( Substr( theClause, 14, Length( theClause ) - 15 ) )
		)
	);
);

All comments

jthi

Without really knowing how you wish the name to look like, I would maybe first look into << Get Where Clause which you can send to the data filter and it would give you something like

"Select Where((:age == 12 | :age == 14) & (:sex == \!"F\!" | :sex == \!"M\!"))"

You can then extract

(:age == 12 | :age == 14) & (:sex == \!"F\!" | :sex == \!"M\!")

and use that as the name

MarginalMouse87

Thank you for the suggestion Jarmo. I have used "Select where" in other scripts. Unfortunately, I need the interactive aspect of the Data Filter because it will be different every time it is run. I cannot hard code specific options as suggested - unless I'm misunderstanding your idea?

As for the name, I can accommodate any format as long as the desired info is in there. I'm not concerned with making the name once I can get the age(s) and sex(es) selected into some variable or object that I can manipulate.

jthi

Format which you get with << Get Where Clause is one option. Optionally you can extract the values from the resulting table based on the columns used in the filter (you can do it from the original table, but it is easier and most likely faster to do it from result table).

txnelson

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

nw = New Window( "Select Parameters", 
	//<<modal,
	<<return result, 
	
	obj = dt << Data Filter(
		//Location( {3000, -600} ),
		Width( 315 ),
		Conditional,
		Add Filter(
			columns( :age, :sex ),
			Display( :Col2, "Check Box Display" ),
			Display( :Col3, "Check Box Display" ),
			Display( :Parameter, N Items( 20 ), "Check Box Display", Find( Set Text( "" ) ) )
		)
	)
);
nw << on close(<BR />   theClause = obj << Get Where Clause;
	If( theClause != "",
		dt << subset(
			selected columns( 1 ),
			selected rows( 1 ),
			output table( Substr( theClause, 14, Length( theClause ) - 15 ) )
		)
	);
);

jthi

@txnelson I think you dropped

theClause = obj << Get Where Clause;

before If.

Parsing option using Regex (not sure if this will work in all cases)

tbl_name = Regex(theClause, "Select Where\((.+)\)", "\1")

MarginalMouse87

Thank you so much! It works perfectly. I really appreciate the lesson on using the Get Where Clause properly. I could see that Jarmo's suggestion to use it was the right way to go, but when I tried it out, I kept getting an error. I see that you solved that by eliminating the modal mode and wrapped it with the code to handle closing the window. I'm learning slowly but I'm learning. Thanks again!