复相关分析m1.bas

来自「<VB数理统计实用算法>书中的算法源程序」· BAS 代码 · 共 20 行

Attribute VB_Name = "modParameter"
'复相关分析
Option Explicit
Public intRow As Integer            '行数
Public intRowAll As Integer         '总行数
Public intCol As Integer            '列数
Public strFileName As String        '数据文件
Public strLabelName As String       '标题
Public intM As Integer, intN As Integer
Public x() As Double, y() As Double '试验数据
Public b() As Single                '回归系数
Public a() As Double                '工作单元
Public t() As Double                't检验值
Public m As Integer, n As Integer
Public xx() As Double               '当前自变量
Public yy() As Double               '当前因变量
Public Ry() As Double               '偏相关系数
Public Rx() As Double               '自变量之间的简单相关系数