问题解决方法：初学Gauss 对于数据输入的疑问-经管之家官网！

For example,

load x[] = dat1.asc;

will load the data in the file dat1.asc into an Nx1 matrix x. This method is preferred because rows(x) can be used to determine how many elements were actually loaded, and the matrix can be reshape’d to the desired form:

load x[] = dat1.asc;

if rows(x) eq 500;
x = reshape(x,100,5);

else;
errorlog “Read Error”;
end;

endif;

For quick interactive loading without error checking, use

load x[100,5] = dat1.asc;

This will load the data into a 100x5 matrix. If there are more or fewer than 500 numbers in the data set, the matrix will automatically be reshaped to 100x5.

2、Writing

To write data to an ASCII file, the print or printfm command is used to print to the auxiliary output. The resulting files are standard ASCII files and can be edited with GAUSS’s editor or another text editor.

The output and outwidth commands are used to control the auxiliary output. The print or printfm command is used to control what is sent to the output file.

The window can be turned on and off using screen. When printing a large amount of data to the auxiliary output, the window can be turned off using the command

screen off;

This will make the process much faster, especially if the auxiliary output is a disk file.

It is easy to forget to turn the window on again. Use the end statement to terminate your programs; end will automatically perform screen on and output off.

The following commands can be used to control printing to the auxiliary output:

format Specify format for printing a matrix.

output Open, close, rename auxiliary output file or device.

outwidth Auxiliary output width.

printfm Formatted matrix print.

print Print matrix or string.

screen Turn printing to the window on and off.

This example illustrates printing a matrix to a file:

format /rd 8,2;

outwidth 132;

output file = myfile.asc reset;

screen off;

print x;

output off;

screen on;

The numbers in the matrix x will be printed with a field width of 8 spaces per number, and with 2 places beyond the decimal point. The resulting file will be an ASCII data file. It will have 132 column lines maximum.

A more extended example follows. This program will write the contents of the GAUSS file mydata.dat into an ASCII file called mydata.asc. If there is an existing file by the name of mydata.asc, it will be overwritten:

output file = mydata.asc reset;

screen off;

format /rd 1,8;

open fp = mydata;

do until eof(fp);
print readr(fp,200);;

endo;

fp = close(fp);

end;

The output ... reset command will create an auxiliary output file called mydata.asc to receive the output. The window is turned off to speed up the process. The GAUSS data file mydata.dat is opened for reading, and 200 rows will be read per iteration until the end of the file is reached. The data read will be printed to the auxiliary output mydata.asc only, because the window is off.

getf will read a file and return it in a string variable. Any kind of file can be read in this way as long as it will fit into a single string variable.

To read files sequentially, use fopen to open the file and use fgets, fputs, and associated functions to read and write the file. The current position in a file can be determined with ftell. The following example uses these functions to copy an ASCII text file:

proc copy(src, dest);

local fin, fout, str;

fin = fopen(src, “rb”);

if not fin;

retp(1);

endif;

fout = fopen(dest, “wb”);

if not fin;

call close(fin);

retp(2);

endif;

do until eof(fin);

str = fgets(fin, 1024);

if fputs(fout, str) /= 1;

call close(fin);

call close(fout);

retp(3);

endif;

endo;

call close(fin);

call close(fout);

retp(0);

endp;

「经管之家」APP：经管人学习、答疑、交友，就上经管之家！
免流量费下载资料----在经管之家app可以下载论坛上的所有资源，并且不额外收取下载高峰期的论坛币。
涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库，各类资料应有尽有。
来自五湖四海的经管达人----已经有上千万的经管人来到这里，你可以找到任何学科方向、有共同话题的朋友。
经管之家（原人大经济论坛），跨越高校的围墙，带你走进经管知识的新世界。
扫描下方二维码下载并注册APP