求高手重写vb方法-回归分析

public String funRegression(double[] arrX,double[] arrY,Integer nCount) {

    //回归算法

    //Calculate the sample statistics for the data set (x,y)

    Double sumx,sumy,sumx2,sumy2,sumxy,xbar,varx,vary,covxy,ybar,sx,sy,b,rxy

    //MAX_ARRAY MAX_ARRAY这俩常数没值，我用参数的长度替换了，

    double[] xin =new double[arrX.length] //modify x data for ifit =2,3,4

    double[] yin=new double[arrY.length] //modify y data for ifit =2,3,4

    for(int k=0k<=nCountk++){

        xin[k]=arrX[k]

        yin[k]=Math.log(arrY[k])

    }

    sumx = sumy =sumx2 = sumy2=sumxy =  0.0

    for(int k=0k<=nCountk++){

        sumx2 = sumx2 + xin[k] 罩携* xin[k] sumy2 = sumy2 + yin[k] * yin[k]

        sumxy = sumxy + xin[k] * yin[k]

    }

    double m = (nCount 物卖伏* sumxy - sumx * sumy) / (nCount * sumx2 - Math.pow(sumx ,2))

    b = (sumy - m * sumx) / nCount

    xbar = 配中sumx / nCountybar = sumy / nCount

    xbar = sumx / nCount ybar = sumy / nCount

    varx = (sumx2 - nCount * Math.pow(xbar, 2)) / (nCount - 1)sx = Math.sqrt(varx)

    vary = (sumy2 - nCount * Math.pow(ybar, 2)) / (nCount - 1) sy = Math.sqrt(vary)

    covxy = (sumxy - nCount * xbar * ybar) / (nCount - 1)

    rxy = covxy / (sx * sy)

    return "int (exp(" + b + ") * exp( " + m + " * @X@ ))"

}

这个比较复杂，我正好最近在弄这些，首先和你说下任务量，首先写好所有抽样分布的函数，分位数以及概率的算法，其中分位数和求概率的算法需要调用伽玛分布算法，阶乘算法，积分算法，另外要有防止数据运算溢出厅启，我完成这些源码和调试花了一个星期，所以扮银如你如果不是非要用vb做，那就用excel那里面基本都有这些函数可以调用，想编编程序，那就用下vba。我之所以用vb.net是由于要做一个整合统计分析，回归分析以及线性规划并包含绘图和云图的搏空功能，这个必须从底层编起

---