分布假设检验m1.bas

<VB数理统计实用算法>书中的算法源程序

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 strColLabel() As String          '列标行
Public intM As Integer, intN As Integer
Public x0() As Double, x1() As Double   '保存分解后的区间端点值
Public x() As Double, y() As Double     '左右端点平均值、观测区间频数
Public y1() As Double                   '理论区间频数（二项式或泊松分布使用）
Public n As Integer                     '数据点数