Hello,
I did something like this using Perl, but Perl didn't have an imaging feature, so I'd like to use JMP instead. I'm finding several steps in this confusing. Is there a JMP expert who could help with either of these items?
1) I have captured the following script (below) to filter off the edges of a XY grid of categorized thingies, and then count defects by categories. I would like to make it more useful by globbing all the files in a directory- name_A...name_F- and applying the script to each file.
2) I would then like to save all the image files each time the script is run.
3) I would like to export all the data in the tables I'm generating to one master file with globbed file names and thingies by classification.
// Import text file: name_F.csv
// → Data Table( "name_F" )
Open(
"$DESKTOP/name_F.csv",
columns(
New Column( "No", Character, "Nominal" ),
New Column( "Class", Character, "Nominal" ),
New Column( "X", Numeric, "Continuous", Format( "Best", 12 ) ),
New Column( "Y", Numeric, "Continuous", Format( "Best", 12 ) ),
New Column( "Energy", Numeric, "Continuous", Format( "Best", 12 ) ),
New Column( "c000006", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000007", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000008", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000009", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000010", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000011", Numeric, "Continuous", Format( "Best", 10 ) ),
New Column( "c000012", Numeric, "Continuous", Format( "Best", 10 ) )
),
Import Settings(
End Of Line( CRLF, CR, LF ),
End Of Field( Comma, CSV( 0 ) ),
Strip Quotes( 1 ),
Use Apostrophe as Quotation Mark( 0 ),
Use Regional Settings( 0 ),
Scan Whole File( 1 ),
Treat empty columns as numeric( 0 ),
CompressNumericColumns( 0 ),
CompressCharacterColumns( 0 ),
CompressAllowListCheck( 0 ),
Labels( 1 ),
Column Names Start( 15 ),
Data Starts( 16 ),
Lines To Read( "All" ),
Year Rule( "20xx" )
)
);
// Report snapshot: name_F - Graph Builder
Data Table( "name_F.csv" ) << Graph Builder(
Size( 502, 432 ),
Show Control Panel( 0 ),
Variables( X( :X ), Y( :Y ) ),
Elements( Points( X, Y, Legend( 5 ) ) )
);
Current Data Table() << Data Filter(
Location( {30, 30} ),
Mode( Include( 1 ) ),
Add Filter(
columns( :X, :Y ),
Where( :X >= 24602 & :X <= 93335 ),
Where( :Y >= 23835 & :Y <= 93002 )
)
);
// Report snapshot: name_F - Graph Builder 2
Graph Builder(
Size( 570, 432 ),
Show Control Panel( 0 ),
Variables( X( :X ), Y( :Y ), Group Y( :Class ) ),
Elements( Points( X, Y, Legend( 15 ) ) )
);
// Report snapshot: name_F - Graph Builder
Graph Builder(
Size( 502, 432 ),
Show Control Panel( 0 ),
Variables( X( :Class ), Y( :X ) ),
Elements(
Bar(
X,
Y,
Legend( 4 ),
Summary Statistic( "N" ),
Label( "Label by Value" )
)
)
);
