快速的BigInteger类，比.Net4自带的要快多了。计算根号2的10W位数字，只需要2.54秒。

liucqa

计算根号2的10W位数字，只需要2.54秒。


调用代码参考如下：

1.         public static object XLLSqrtBA(string Param1,int CustomScale)
   
2.         {
   
3.             //判断是不是符合数字要求
   
4.             if (!isNumeric(Param1)) return (object)ExcelError.ExcelErrorValue;
   
5.             if (Param1.StartsWith("-")) return (object)ExcelError.ExcelErrorValue;
   
6. 
   
7.             int decimalpartlength = 0;
   
8. 
   
9.             //检查被除数小数部分长度
   
10.             int point = Param1.IndexOf('.');
    
11.             int pointAdjust = 0;
    
12.             if (point >= 0)
    
13.             {
    
14.                 decimalpartlength = Param1.Length - point - 1;                                        //得到小数部分长度
    
15.                 if (!((decimalpartlength & 1) == 0))
    
16.                 {
    
17.                     pointAdjust = 1;
    
18.                 }
    
19.             }
    
20.             Param1 = Param1.Replace(".", "");       //去掉小数点，等于放大了decimalpartlength次幂
    
21. 
    
22.             string input = Param1 + new string('0', 2 * CustomScale + pointAdjust);   //再放大小数位的精度，放大倍数是精度*2   (平方根)
    
23.             Skyiv.Numeric.BigInteger ba1 = Skyiv.Numeric.BigInteger.Parse(input);
    
24.             Skyiv.Numeric.BigInteger ba2 = Skyiv.Numeric.BigInteger.Sqrt(ba1);
    
25.             string result = ba2.ToString();
    
26. 
    
27.             int rightpos = (decimalpartlength + pointAdjust) / 2 + CustomScale;
    
28.             result = result.Insert(result.Length - rightpos, ".");
    
29.             //超出精度截断
    
30.             if (rightpos > CustomScale) result = result.Substring(0, result.Length - (rightpos - CustomScale));
    
31.             return result;
    
32.         }

复制代码

代码使用了Skyiv.Numeric开源库，下载地址 https://bitbucket.org/ben.skyiv/biginteger，顺便说一下，俺调用的是这个库的快速傅立叶变换的那个BigInteger类，而快速傅立叶变换对小规模数据的效率一般，不过由于数据规模小，即使效率一般对整体性能的影响也不大，可以接受。

加载宏下载：
TestXllFunction.rar (936.62 KB, 下载次数: 34)

2013-12-1 15:32 上传

点击文件名下载附件

打包后的函数执行速度会慢50%，在我的机器上如下：


具体原因就不解释了。


最后总结：
通过对BigDecimal的研究，俺学会了操作符重载和VS的单元测试、性能分析等，这是最大的收获

homehomehome

多谢分享,收了