C#,数值计算——函数计算,Epsalg的计算方法与源程序

1 文本格式

using System;

namespace Legalsoft.Truffer

{

/// <summary>

/// Convergence acceleration of a sequence by the algorithm.Initialize by

/// calling the constructor with arguments nmax, an upper bound on the

/// number of terms to be summed, and epss, the desired accuracy.Then make

/// successive calls to the function next, with argument the next partial sum

/// of the sequence. The current estimate of the limit of the sequence is

/// returned by next.The flag cnvgd is set when convergence is detected.

/// </summary>

public class Epsalg

{

private double[] e { get; set; }

private int n { get; set; }

private int ncv { get; set; }

public bool cnvgd { get; set; }

/// <summary>

/// Numbers near machine underflow and overflow limits.

/// </summary>

private double eps { get; set; }

private double small { get; set; }

private double big { get; set; }

private double lastval { get; set; }

private double lasteps { get; set; }

public Epsalg(int nmax, double epss)

{

this.e = new double[nmax];

this.n = 0;

this.ncv = 0;

this.cnvgd = false;

this.eps = epss;

this.lastval = 0.0;

small = float.MinValue * 10.0;

big = double.MaxValue;

}

public double next(double sum)

{

e[n] = sum;

double temp2 = 0.0;

for (int j = n; j > 0; j--)

{

double temp1 = temp2;

temp2 = e[j - 1];

double diff = e[j] - temp2;

if (Math.Abs(diff) <= small)

{

e[j - 1] = big;

}

else

{

e[j - 1] = temp1 + 1.0 / diff;

}

}

n++;

double val = (n & 1) != 0 ? e[0] : e[1];

if (Math.Abs(val) > 0.01 * big)

{

val = lastval;

}

lasteps = Math.Abs(val - lastval);

if (lasteps > eps)

{

ncv = 0;

}

else

{

ncv++;

}

if (ncv >= 3)

{

cnvgd = true;

}

return (lastval = val);

}

}

}

2 代码格式

cs 复制代码
using System;

namespace Legalsoft.Truffer
{
    /// <summary>
    /// Convergence acceleration of a sequence by the algorithm.Initialize by
    /// calling the constructor with arguments nmax, an upper bound on the
    /// number of terms to be summed, and epss, the desired accuracy.Then make
    /// successive calls to the function next, with argument the next partial sum
    /// of the sequence. The current estimate of the limit of the sequence is 
    /// returned by next.The flag cnvgd is set when convergence is detected.
    /// </summary>
    public class Epsalg
    {
        private double[] e { get; set; }
        private int n { get; set; }
        private int ncv { get; set; }
        public bool cnvgd { get; set; }
        /// <summary>
        /// Numbers near machine underflow and overflow limits.
        /// </summary>
        private double eps { get; set; }
        private double small { get; set; }
        private double big { get; set; }
        private double lastval { get; set; }
        private double lasteps { get; set; }

        public Epsalg(int nmax, double epss)
        {
            this.e = new double[nmax];
            this.n = 0;
            this.ncv = 0;
            this.cnvgd = false;
            this.eps = epss;
            this.lastval = 0.0;
            small = float.MinValue * 10.0;
            big = double.MaxValue;
        }

        public double next(double sum)
        {
            e[n] = sum;
            double temp2 = 0.0;
            for (int j = n; j > 0; j--)
            {
                double temp1 = temp2;
                temp2 = e[j - 1];
                double diff = e[j] - temp2;
                if (Math.Abs(diff) <= small)
                {
                    e[j - 1] = big;
                }
                else
                {
                    e[j - 1] = temp1 + 1.0 / diff;
                }
            }
            n++;
            double val = (n & 1) != 0 ? e[0] : e[1];
            if (Math.Abs(val) > 0.01 * big)
            {
                val = lastval;
            }
            lasteps = Math.Abs(val - lastval);
            if (lasteps > eps)
            {
                ncv = 0;
            }
            else
            {
                ncv++;
            }
            if (ncv >= 3)
            {
                cnvgd = true;
            }
            return (lastval = val);
        }

    }
}
相关推荐
浮生如梦_1 小时前
Halcon基于laws纹理特征的SVM分类
图像处理·人工智能·算法·支持向量机·计算机视觉·分类·视觉检测
△曉風殘月〆1 小时前
WPF MVVM入门系列教程(二、依赖属性)
c#·wpf·mvvm
XiaoLeisj2 小时前
【JavaEE初阶 — 多线程】单例模式 & 指令重排序问题
java·开发语言·java-ee
励志成为嵌入式工程师3 小时前
c语言简单编程练习9
c语言·开发语言·算法·vim
逐·風3 小时前
unity关于自定义渲染、内存管理、性能调优、复杂物理模拟、并行计算以及插件开发
前端·unity·c#
捕鲸叉3 小时前
创建线程时传递参数给线程
开发语言·c++·算法
A charmer3 小时前
【C++】vector 类深度解析:探索动态数组的奥秘
开发语言·c++·算法
Peter_chq3 小时前
【操作系统】基于环形队列的生产消费模型
linux·c语言·开发语言·c++·后端
wheeldown4 小时前
【数据结构】选择排序
数据结构·算法·排序算法
记录成长java5 小时前
ServletContext,Cookie,HttpSession的使用
java·开发语言·servlet