Checking loop through a table to check if the column is numeric or nominal

[#1]

I have the following table that is the result from stacking and splitting a much larger table. As you can see, X1, 3 and 5 are Numeric and X2, 4 and 6 are Characters. Because this is a results of stacking and splitting, everything is converted to Nominal and Character, is there away to loop through all the columns, check if the value in the 1st row is numeric/continuous and convert the X1, X3 and X5 column back to numeric and continuous?

[#2 · Accepted solution]

Here is a simple script that will convert the columns found to have numeric values

Names Default To Here( 1 );
dt = Current Data Table();

colNames = dt << get column names( string, character );

For( i = 1, i <= N Items( colNames ), i++,
	If( Is Missing( Num( Column( dt, colNames[i] )[1] ) ) == 0,
		Column( dt, colNames[i] ) << data type( numeric ) << modeling type( continuous )
	)
);

It looks like you need to take the time to read through the Scripting Guide

     Help==>Books==>Scripting Guide