You're probably losing a decent amount of information from this method, but this should be able to pull out the 3 materials with the "least correlation" to one another. They won't be orthogonal for sure. There's probably a better way to frame this (something like what Peter is saying) in order to get the answers you want.
*Caveat, this is purely made up and I don't know how sound it is. It makes sense in my head that it does what I think you're asking for though"
dt = Open("$Sample_DATA\Solubility.jmp");
//do multivariate across all the chemicals
mv = Multivariate(
Y(
:Name( "1-Octanol" ),
:Ether,
:Chloroform,
:Benzene,
:Carbon Tetrachloride,
:Hexane
),
Estimation Method( "Row-wise" ),
Matrix Format( "Square" ),
Scatterplot Matrix(
Density Ellipses( 1 ),
Shaded Ellipses( 0 ),
Ellipse Color( 3 )
)
);
mv_r = mv << report;
//make the correlations into a data table
dt_corr = mv_r[MatrixBox(1)]<<Make into Data table();
//sum up correlations for all
dt_corr << New Column("Total Correlation", Formula(
Sum(
:Name( "1-Octanol" ),
:Ether,
:Chloroform,
:Benzene,
:Carbon Tetrachloride,
:Hexane
)
));
//the lowest three are the "least correlated" to one another
materials = :Row << Get Values;
mat = :TotalCorrelation << Get Values;
top = sortascending(mat)[3]; //picks the value for 3rd lowest
what_you_want_maybe = materials[loc(mat<=top)] //grabs the 3 lowest Total Correlation chemicals
Returns:
{"1-Octanol", "Ether", "Chloroform"}