TABLE_COLUMNS_PERMUTE
Scale a Table Dataset

TABLE_COLUMNS_PERMUTE is a FORTRAN90 program which reads a text file, each of whose lines contains COL_NUM "words" or items. It accepts a permutation from the user, and writes out a copy of the file after permuting the columns.

For instance, suppose the file looks like this:

        # Comments look like this and are ignored.
        #
         cat  dog  horse
           1    2      3
         xxx   yy      z
      

        # Comments look like this and are ignored.
        #
           horse cat  dog
               3   1    2
               z xxx   yy
      

The input data is treated abstractly. It is assumed to be separated by blanks, and each item, when permuted, will also include the initial blanks. For this reason, it's best if the first entry of each data line is a blank, so that the first column of data will be properly delimited after being moved.

Usage:

table_columns_permute file.txt

reads the user's data file file.txt, prompts for a permutation vector from the user, and then writes the scaled data to a file which will be called file.permuted.txt.

Related Data and Programs:

TABLE is the file format used by this program.

TABLE_BARPLOT_PPMA is an executable FORTRAN90 program which reads a table file and creates a PPMA bargraph of the data.

TABLE_BORDER is an executable FORTRAN90 program which can be used to add a border (of zero values) to a table file.

TABLE_COLUMNS is an executable FORTRAN90 program which can extract specific columns of data from a table file.

TABLE_DELAUNAY is an executable FORTRAN90 program which computes the Delaunay triangulation of a set of points.

TABLE_DIAPHONY is an executable FORTRAN90 program which computes the diaphony of a set of points stored in a table file.

TABLE_HISTOGRAM is an executable FORTRAN90 program which can make a histogram of a set of points stored in a table file.

TABLE_IO is a FORTRAN90 library which supplies the routines used to read the TABLE file.

TABLE_LATINIZE is an executable FORTRAN90 program which reads a file of points and creates a "latinized" version by adjusting the data.

TABLE_MERGE is an executable FORTRAN90 program which reads a file of points, and removes duplicates, and points that are close to each other.

TABLE_ORTHONORMALIZE is an executable FORTRAN90 program which reads a file of points and orthonormalizes the columns.

TABLE_QUALITY is an executable FORTRAN90 program which reads a file of points and computes the quality of dispersion.

TABLE_READ is a MATLAB script that can read in a TABLE file.

TABLE_RECORD_MATCH is an executable FORTRAN90 program which finds close records in a table file.

TABLE_SCALE is an executable FORTRAN90 program that multiplies the entries of a table file by a scale vector.

TABLE_SHIFT is an executable FORTRAN90 program which can be used to shift the entries of a table file by a shift vector.

TABLE_STATS is an executable FORTRAN90 program which reads a table file and compute certain statistics.

TABLE_TET_MESH is an executable FORTRAN90 program which reads a table file of 3D data, and compute a tetrahedral mesh.

TABLE_TOP is an executable FORTRAN90 program which reads a table file of M-dimensional data and make a table of plots of all pairs of coordinates.

TABLE_UNBORDER is an executable FORTRAN90 program which removes the border from a table file.

TABLE_UNIFORM_NOISE is an executable FORTRAN90 program which adds a uniform noise term to the data in a table file.

TABLE_VORONOI is an executable FORTRAN90 program which computes information about the Voronoi diagram of the points.

Source Code:

• table_columns_permute.f90, the source code.
• table_columns_permute.csh, commands to compile, link and load the source code.

Examples and Tests:

TABLE7X10 is a file of 7 lines of text, each containing 10 columns of data. Files you may copy include:

• table7x10.txt, the original data.
• table7x10.permuted.txt, the table of data, after being permuted by the permutation (10,9,8,7,6,5,4,3,2,1).

List of Routines:

• MAIN is the main program for TABLE_COLUMNS_PERMUTE.
• CH_CAP capitalizes a single character.
• FILE_COLUMN_COUNT counts the number of columns in the first line of a file.
• FILE_NAME_EXT_GET determines the "extension" of a file name.
• FILE_NAME_EXT_SWAP replaces the current "extension" of a file name.
• FILE_ROW_COUNT counts the number of row records in a file.
• GET_UNIT returns a free FORTRAN unit number.
• PERM_INVERSE3 produces the inverse of a given permutation.
• S_COPY copies one string into another.
• S_INDEX_LAST finds the LAST occurrence of a given substring.
• S_WORD_COUNT counts the number of "words" in a string.
• S_WORD_PERMUTE permutes the words in a string.
• TIMESTAMP prints the current YMDHMS date as a time stamp.

You can go up one level to the FORTRAN90 source codes.