EViews命令和编程之怎样使用表格

1、.EViews 命令和编程之 怎样使用表格使用 Eviews 命令可由程序生成用户自定义的格式化输出数据的表格。表格是由单元形成的行和列组成的对象， 每个单元中既可包含数值，也可包含字符串， 还可包含控制该单元显示输出或打印输出格式的控制信息。表格的列可以设置成不同的宽度， 增加水平线可将表格分隔成以资区别的部分。当填充完表格各个单元后， 可以使用 print 命令或者单击表格工具条上的 Print 按钮，将该表格对象打印出来。参见 Working withTables and Texts 帮助文件中对表格对象详细介绍。一、申明一个表格（Declaring a Table）申明一个表格对象，

2、应当指出表格包含的行数和列数，并为申明的表格提供一个有效的名称作为表格对象名。例如，table(10,20) bestres建立了一个 10 行、 20 列名为 BESTRES的表格对象。可以再次通过申明语句变更表格的大小。再申明为一个加大的表格对象时，将不会破坏原表格中的内容，原表格单元中的内容将继续保存于新表格中。.当用户企图对表格当前定义维数以外的单元中填充数据，表格对象将会自动地调整表格的大小，以接纳填充的内容。 表格的这种行为属性与矩阵对象不一样，当存取矩阵定义维数以外的元素时将给出出错信息。二、控制表格的外貌（Controlling the Appearance of aTable

3、 ）根据缺省设置，每个表格单元的长度可显示 10 个字符。如果字符串的长度超过单元的显示宽度，那么该字符串的一部分将是不可见的。采用 setcolwidth 命令可改变表格的列宽。 Setcolwidth 关键字之后的括号中，填入表格名称、要调整宽度的列号和列中近似的字符个数。 Eviews 依据一个数字字符的宽度来度量表格单元的大小。 不同的字符占.据不同的宽度， 所以实际显示的字符数与设置的字符数可能存在少许的差异。例如，setcolwidth(bestres,2,12)设置 BESTRES表格第二列的宽度， 使第二列的宽度大约有12 个字符长。采用 setline命令在表格中放置水平线。

4、Setline关键字后的括号中填入表格名和行号。例如setline(bestres,8)在 BESTRES表格的第 8 行中放置一条分隔线。三、填充表格中的单元（Filling Cells of a Table）采用赋值语句给表格单元赋值。 每个表格单元都可以赋给字符串数值或者赋给一个数值值。字符串 （Strings ）给表格单元设置字符串数值赋值语句的格式：表格名（行号，列号）= 字符串表达式表达式的计算结果是一个字符串的表达式称为字符串表达式。例如，bestres(1,6) = "convergence criterion".%strvar = "lm tes

5、t"bestres(2,6) = %strvarbestres(2,6) = bestres(2,6)+" with 5 df"数值（ Numbers）数值可以直接键入表格单元， 或者在将数值置入表格单元前先将它们转换成字符串后，作为字符串置入表格单元。如果直接将数值键入单元，数值将按那个单元设置的数值格式进行显示；如果单元的格式发生变化，那么数值将按照新格式重新显示。 如果数值置入表格之前被转换成了字符串，那么数值将被冻结成那个格式，也不能再对它进行格式化。根据 Eviews 的缺省设置，数值将以填满单元格的数字位数进行显示，如有必要则采用科学计数法的方式显示。

6、对应地，如果采用函数，先将数值转换成字符串，那么字符串将保持必要的小数位的方式显示数值。下面是一些涉及数值赋值的例子：tab1(3,4) = 15tab1(4,2) = "R-squared = " + str(eq1.r2)!ev = 10tab1(5,1) = "There are " + str(!ev) + " events"单元格式化 （Cell Formatting）.单元设置命令 setcell 与单元赋值语句类似也可以为表格单元设置内容，同时单元设置命令 setcell 还允许用户为表格单元设置格式选项。单元设置命令

7、setcell 是通过命令行和通过编程调整单元格式的唯一方法。单元设置命令 setcell 可以接受下列形式参数：表格名称表格单元的行号和列号放置入表格单元的数值或字符串选项：对齐代码、数值格式代码或者两种代码都有对齐代码包括："c"居中（缺省设置）"r"右对齐"l"左对齐.点击工具条上的number 按钮打开数据格式对话框（Number Format）。数值格式代码决定了表格单元中数值的显示格式； 数值格式代码对包含字符串的表格单元无效。 数值格式代码分为两类： 正整数代码指定小数点以后的位数，相应于数值（ number）格式对话框

8、中的固定小数位数栏（fixed decimal ）；负整数代码指定显示数值的总位数，相应于数值格式对话框中的固定字符数栏（ fixed character ）。注意，使用负数格式代码时最前面的一位总是被保留，用以显示该数据的符号，如果数据存在小数点，小数点也作为一个字符计算在显示位数中。因此，扣除这两项余下的长度才是显示数据的位数。如果数据太大或者太小以至于没有足够的空间显示它们，那么Eviews 将采用科学计数法来显示这类数据。如果表格单元没有足够的（6 位字符或更小）空间显示科学计数法表示的数据，那么这个单元格将显示一个星号，指示该单元格显示出错。下面是使用设置单元格命令setcell的例

9、子：setcell(tabres,9,11,%label)将数值常数变量 %label 的值置入表格TABRES中位于 9 行，11 列的单元格内。setcell(big_tabl,1,1,%info,"c").将数值常数变量 %info 的值插入表格big_tabl中位于 1 行，1 列的单元格内并居中显示。setcell(tab1,5,5,!data)将数值常数变量 !data的值置入表格 TAB1中位于 5 行，5 列的单元格内，采用缺省设置的数值格式显示。setcell(tab1,5,6,!data,4)将数值常数变量 !data的值置入表格 TAB1中位于 5 行

10、，6 列的单元格内，显示时小数点后保留4 位小数。setcell(tab1,3,11,!data,"r",3)将数值常数变量 !data的值置入表格TAB1中位于 3 行， 11 列的单元格内，采用右对齐格式显示数据，小数点后保留3 位小数。setcell(tab1,4,2,!data,-7)将数值常数变量 !data的值置入表格 TAB1中位于 4 行，2 列的单元格内，一共显示 7 位字符。四、表格举例（Table Example ）这里对上述例题作进一步地扩展，介绍如何通过程序构造一个表格。这个程序为组内每一个序列构造一个表格，用来显示各个序列单位根检验的结果。.首先

11、编制一个子程序，以形式参数向量的形式为组内每个序列返回Dickey-Fullert- 统计量（关于子程序的构造方法参见：Subroutines ）：subroutine local muroot(group g1, vector v1)' get number of series in group !n = g1.count' declare vector to save results vector(!n) tstat' do ADF test for each series in group for !i=1 to !n%str = g1.seriesname(!i

12、) series temp = %strequation eq_temp.ls d(temp) temp(-1) c tstat(!i) = eq_temp.tstat(1)next' copy results to global vectorv1 = tstat.endsub注意，我们没有将每一次所得结果，直接传递给要返回数值的形式参数向量 vector v1 中的元素。如果那样作个话，那么在调用函数值前必须知道组对象中的序列个数，因此要正确地给出向量vector v1的大小。对应地，我们将结果存储在一个临时的暂存向量中，而在程序结束时的向量赋置于居中暂存向量复制到作为返回的形式参数

13、变量中。这个形式参数向量的大小是根据需要自动调整的。下面这个程序是构造显示单位根检验结果表格的程序：include c:evdataprogramsmurootload c:evdatamacrogroup grp1 ff tb3 tb10vector tstatcall muroot(grp1,tstat)' get number of series in group scalar n = grp1.count' declare table and fill in headers table(6,n+1) adf.setcell(adf,1,1,"ADF test

14、(no lagged first differences with a constant)")setline(adf,2)setcell(adf,3,1,"series")setcell(adf,4,1,"t-stat")setline(adf,5)setcell(adf,6,1,"5% critical value is -2.86 (Davidson &MacKinnon, Table 20.1)")' fill in cells for !i=1 to n setcell(adf,3,!i+1,grp1.seriesname(!i)setcell(adf,4,!i+1,tstat(!i),