TABLE_IO
TABLE file
Read and Write Utilities

TABLE_IO is a FORTRAN77 library which can read or write a TABLE file.

A TABLE file is a simple format for storing a double-indexed array of data. We regard this is a situation involving N points in M dimensions, with M relatively small (often just 2 or 3, but possibly 10 or 20) while N can be "enormous" (10, 100, 1,000 or 10,000).

To keep things simple, then, the data is written to an ASCII file, with optional comment lines (which must start with the '#' character) and blank lines (which are ignored). The point data is stored by writing the coordinates of each point on a separate line. No information about M or N is explicitly included in the file. It is up to the I/O program to determine this.

TABLE_IO supplies routines by which a TABLE file can easily be written or read. A typical write operation for a double precision real table simply calls routine R8MAT_WRITE. A typical read operation will probably first want to call R8MAT_HEADER_READ to determine the values of M and N, and then allocate space for the table, and then call R8MAT_DATA_READ to read the data.

TABLE_IO includes routines to read and write table datasets that are integer (I4MAT) or double precision real (R8MAT).

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Languages:

TABLE_IO is available in a C version and a C++ version and a FORTRAN77 version and a FORTRAN90 version and a MATLAB version and a Python version and

Related Data and Programs:

TABLE, the data format which is used to store data in files.

TABLE_BARPLOT_PPMA, a FORTRAN90 program which reads a table file and creates a ASCII PPM bargraph of the data.

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

TABLE_COLUMNS, a FORTRAN90 program which can extract specific columns of data from a table file.

TABLE_COLUMNS_PERMUTE, a FORTRAN90 program which permutes the columns of a table file.

TABLE_DELAUNAY, a FORTRAN90 program which computes the Delaunay triangulation of a set of points.

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

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

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

TABLE_ORTHONORMALIZE, a FORTRAN90 program which reads a file of points and orthonormalizes the columns.

TABLE_QUALITY, a FORTRAN90 program which reads a file of points and computes the quality of dispersion.

TABLE_RECORD_MATCH, a FORTRAN90 program which finds close records in a table file.

TABLE_SCALE, a FORTRAN90 program which multiplies the entries of a table file by a scale vector.

TABLE_SHIFT, a FORTRAN90 program which shifts the entries of a table file by a shift vector.

TABLE_STATS, a FORTRAN90 program which reads a table file and computes certain statistics.

TABLE_TET_MESH, a FORTRAN90 program which reads a table file of 3D data, and computes a tetrahedral mesh.

TABLE_TOP, a FORTRAN90 program which reads a table file of M-dimensional data and makes a table of plots of all pairs of coordinates.

TABLE_UNBORDER, a FORTRAN90 program which removes the border from a table file.

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

TABLE_VORONOI, a FORTRAN90 program which can be used to compute information about the Voronoi diagram of the points.

Source Code:

• table_io.f, the source code.
• table_io.sh, commands to compile the source code.

Examples and Tests:

• table_io_prb.f, a sample calling program.
• table_io_prb.sh, commands to compile and run the sample program.
• table_io_prb_output.txt, the output file.
• r8mat_05_00020.txt, a table file with double precision real data created by the sample program, with N = 20 points in M = 5 dimensions.
• i4mat_05_00020.txt, a table file with integer data created by the sample program, with N = 20 points in M = 5 dimensions.

List of Routines:

• CH_CAP capitalizes a single character.
• CH_EQI is a case insensitive comparison of two characters for equality.
• CH_TO_DIGIT returns the integer value of a base 10 digit.
• FILE_COLUMN_COUNT counts the number of columns in the first line of a file.
• FILE_ROW_COUNT counts the number of row records in a file.
• GET_UNIT returns a free FORTRAN unit number.
• I4_HUGE returns a "huge" I4.
• I4_LOG_10 returns the integer part of the logarithm base 10 of ABS(X).
• I4MAT_BORDER_ADD adds a "border" to an I4MAT.
• I4MAT_BORDER_CUT cuts the "border" of an I4MAT.
• I4MAT_DATA_READ reads data from an I4MAT file.
• I4MAT_HEADER_READ reads the header from an integer table file.
• I4MAT_INDICATOR sets up an "indicator" I4MAT.
• I4MAT_PRINT prints an I4MAT.
• I4MAT_PRINT_SOME prints some of an I4MAT.
• I4MAT_WRITE writes an I4MAT file.
• LVEC_DATA_READ reads data from an LVEC file.
• LVEC_HEADER_READ reads the header from an LVEC file.
• LVEC_WRITE writes an LVEC file.
• R4MAT_DATA_READ reads data from an R4MAT file.
• R4MAT_HEADER_READ reads the header from an R4MAT file.
• R4MAT_INDICATOR sets up an "indicator" R4MAT.
• R4MAT_PRINT prints an R4MAT.
• R4MAT_PRINT_SOME prints some of an R4MAT.
• R4MAT_TRANSPOSE_PRINT prints an R4MAT, transposed.
• R4MAT_TRANSPOSE_PRINT_SOME prints some of an R4MAT transposed.
• R4MAT_UNIFORM_01 returns a unit pseudorandom R4MAT.
• R4MAT_WRITE writes a R4MAT file.
• R8MAT_BORDER_ADD adds a "border" to an R8MAT.
• R8MAT_BORDER_CUT cuts the "border" of an R8MAT.
• R8MAT_DATA_READ reads data from an R8MAT file.
• R8MAT_HEADER_READ reads the header from an R8MAT file.
• R8MAT_INDICATOR sets up an "indicator" R8MAT.
• R8MAT_PRINT prints an R8MAT.
• R8MAT_PRINT_SOME prints some of an R8MAT.
• R8MAT_TRANSPOSE_PRINT prints an R8MAT, transposed.
• R8MAT_TRANSPOSE_PRINT_SOME prints some of an R8MAT transposed.
• R8MAT_UNIFORM_01 returns a unit pseudorandom R8MAT.
• R8MAT_WRITE writes a R8MAT file.
• R8VEC_DATA_READ reads data from an R8VEC file.
• R8VEC_HEADER_READ reads the header from an R8VEC file.
• R8VEC_WRITE writes an R8VEC file.
• R8VEC2_WRITE writes an R8VEC2 file.
• S_LEN_TRIM returns the length of a string to the last nonblank.
• S_TO_I4 reads an I4 from a string.
• S_TO_I4VEC reads an I4VEC from a string.
• S_TO_L reads a logical value from a string.
• S_TO_R4 reads an R4 from a string.
• S_TO_R4VEC reads an R4VEC from a string.
• S_TO_R8 reads an R8 from a string.
• S_TO_R8VEC reads an R8VEC from a string.
• S_WORD_COUNT counts the number of "words" in a string.
• TIMESTAMP prints out the current YMDHMS date as a timestamp.

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