zoukankan      html  css  js  c++  java
  • 模块------计算对数

    1、计算以e为底的对数,我们可以直接使用log函数:my $log_e = log($value);

    2、计算以10为底的对数:

          use POSIX qw(log10);my $log_10 = log10($value);

    3、有了以上两个函数中的任何一个,那么我们就可以计算任意数的对数了,计算方法为:log n (x) = (log A (x) / log A (n)),(其中A为任意正数,当然可以是10或者e),按照这个公式,构造子程序如下:

    1. sub log_base {
    2.     my ($value,$base) = @_;
    3.     return log($value)/log($base);  ####推荐!!!!或者 return log10($value)/log10($base); 
    4. }

    通过上面的子程序,我们就可以随时调用,做任意的对数运算了。

    4、perl给我们提供了Math::Complex模块,用来计算任意数的对数:  #####推荐!

    use Math::Complex;

    my $log_n = logn(x);

    eg:

    1. use Math::Complex;

    1. printf “log2(1024) = %lf “, logn(1024, 2);         # log2(1024) = 10.000000

    参考:http://yangl.net/2016/06/20/perl_log/

  • 相关阅读:
    第二阶段冲刺记录八
    用户体验评价
    找水王
    第二阶段冲刺记录七
    第二阶段冲刺记录六
    第14周学习进度
    第二阶段冲刺记录五
    第二阶段冲刺记录四
    第一阶段意见评论
    IP协议号大全
  • 原文地址:https://www.cnblogs.com/Formulate0303/p/8657179.html
Copyright © 2011-2022 走看看