【丧心病狂】被玩坏的RMXP之一些计算和判定

chd114

使用方法：按F11插入脚本编辑器MAIN前即可
声明：里面部分计算非楼主所做···所以请不要随意署名
@弗雷德 @P叔 @凌童鞋 @晴兰 ···顺便很无耻地@美丽晨露 @= =@hys111111

@myownroc

@tjjlb
我知道学生党一定会用到的···
[pre lang="ruby" line="1"]class Numeric
  def mirrornumber # 颠倒数（镜像数）这个是自己起的名字···其实本来想参考必修3做个回文数的但是找不到了就做了个这个···
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    num=0
    sn=[]
    x=0
    self_array = self.to_s.scan(/./) # 分割每一位上的数字
    for char in self_array # 获取位数
      sn[x]=char.to_i
      x+=1
    end
    for i in 0...sn.size
      num+=sn[sn.size-1-i]*10**(sn.size-1-i)
    end
    return num.truncate == num ? num.truncate : num
  end

  def disnumber # 相反数
    num=-self
    return num.truncate == num ? num.truncate : num
  end
  def unnumber # 倒数
    num=1.0/self
    return num.truncate == num ? num.truncate : num
  end
  def prime(y) # 判定质数（y非0时必须用print，否则会p num => nil）
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    num=nil
    if self==2
      if y==0
        num=1
      else
        num=self.to_s+"是质数"
      end
    end
    if num==nil
      i=2
      r=self%i
      until i>self-1 or r==0
        r=self%i
        i+=1
      end
      if y==0
        if r==0
          num=0
        else
          num=1
        end
      else
        if r==0
          num=self.to_s+"不是质数"
        else
          num=self.to_s+"是质数"
        end
      end
    end
    return num.to_s == num ? num.to_s : num
  end
  def zxgbs(y) # 标准的《九章算术》中先求最大公约数再求最小公倍数
    num=nil
    n=[self,y]
    for i in 0...n.size
      if n <= 0
        raise ArgumentError.new("NaN")
      end
    end
    n=n.sort # 从小到大重新排序
    if num==nil
      i=n[0].cm2(n[1])
      num=n[0]*n[1]/i
    end
    return num.to_s == num ? num.to_s : num
  end
  def cm1(y) # 辗转相除法求最大公约数（部分情况会失控）
    n=[self,y]
    for i in 0...n.size
      if n <= 0
        raise ArgumentError.new("NaN")
      end
    end
    n=n.sort # 从小到大重新排序
    num=n[1]
    i=num%n[0]
    if i=0#余数为0时最大公约数为小的数
      num=n[0]
    else
      while i!=0
        num=n[0]
        n[0]=i
        i=num%n[0]
      end
    end
    return num.to_s == num ? num.to_s : num
  end
  def cm2(y) # 更相损减术求最大公约数
    n=[self,y]
    for i in 0...n.size
      if n <= 0
        raise ArgumentError.new("NaN")
      end
    end
    i=1
    if n[0]%2==0 and n[1]%2==0
      n=[self/2,y/2]
      i+=1
    end
    n=n.sort # 从小到大重新排序
    num=n[1]-n[0]
    if num==n[0] # 差等于减数时最大公约数为减数（差）
      num=n[0]
    else
      while num!=n[0]
        if n[0]>num
          n=[num,n[0]]
        else
          n=[num,n[1]]
        end
        num=n[1]-n[0]
      end
    end
    num*=i
    return num.to_s == num ? num.to_s : num
  end
  # 一元N次N项式
  def dxs1(y) # 逐项求
    num=0
    for i in 1..y.size
      num+=y[i-1]*self**(y.size-i)
    end
    return num.truncate == num ? num.truncate : num
  end
  def dxs2(y) # 秦九韶算法
    num=y[0]
    for i in 1..y.size-1
      num*=self
      num+=y
    end
    return num.truncate == num ? num.truncate : num
  end
  # 等差数列arithmetic_progression
  def ari(x,y) # 等差数列求第y项
    num=self+(y-1)*x
  end
  def arih1(x,y) # 等差数列已知首项self求前y项和
    num=y*self+(y-1)*y*x/2
  end
  def arih2(x,y) # 等差数列已知末项self求前y项和
    num=y*self-(y-1)*y*x/2
  end
  def arih3(x,y) # 等差数列已知首项x和末项y和元素数求和
    num=self*(x+y)/2
  end
  # 等比数列geometric_sequence
  def geo(x,y) # 等比数列求第y项
    num=self*x**(y-1)
    return num.truncate == num ? num.truncate : num
  end
  def geoh1(x,y) # 等比数列求前y项和
    num=self # 获取a1
    for i in 1...y
      num+=x**(i) # 依次加上a2、a3...直到an
    end
    return num.truncate == num ? num.truncate : num
  end
  def geoh2(x,y) # 等比数列已知首项self求前y项和
    num=(self*(1-x**y))/(1-x)
    return num.truncate == num ? num.truncate : num
  end
  def geoh3(x,y) # 等比数列已知首项self和末项y求前y项和
    num=(self-y*x)/(1-x)
    return num.truncate == num ? num.truncate : num
  end
  def factorial # 阶乘
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    num=self
    fnum=self
    for i in 2...fnum # 乘数取1到阶乘基数本身之间的数
      num*=i
    end
    return num.truncate == num ? num.truncate : num
  end
  def log(y) # 对数函数
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    x=self
    num=1
    while x!=y
      x/=y
      num+=1
    end
    return num.truncate == num ? num.truncate : num
  end
  def lg # 以10为底的对数函数
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    x=self
    num=1
    while x!=10
      x/=10
      num+=1
    end
    return num.truncate == num ? num.truncate : num
  end
  def sqr # 平方
    return self ** 2
  end
  def cube # 立方
    return self ** 3
  end
  def powten # 10 的 self 次方
    return 10 ** self
  end
  def enf(y) # 任意次方
    num = self ** y
    return num.truncate == num ? num.truncate : num
  end
  def sqrt # 开平方
    if self.abs != self
      raise ArgumentError.new("NaN")
    end
    num = self ** 0.5
    return num.truncate == num ? num.truncate : num
  end
  def cuberoot # 开立方
    if self.abs != self
      num = (self * (-1)) ** (1 / 3.0)
      return num.truncate == num ? -num.truncate : -num
    end
    num = self ** (1 / 3.0)
    return num.truncate == num ? num.truncate : num
  end
  def root(y) # 开任意次方
    if self.abs != self and y % 2 == 0
      raise ArgumentError.new("NaN")
    end
    if self.abs != self
      num = (self * (-1)) ** (1.0 / y)
      return num.truncate == num ? -num.truncate : -num
    end
    num = self ** (1.0 / y)
    return num.truncate == num ? num.truncate : num
  end
end
class Array
  def average(need_dec = true) # 平均数 (是否使用浮点数)
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    if ary.size == 0
      raise ZeroDivisionError.new("divided by 0")
    end
    for i in 0...ary.size
      if ary.is_a?(Numeric)
        num += ary
      else
        raise TypeError.new("connot convert #{ary.class} into Numeric")
      end
    end
    num /= ary.size.to_f
    unless need_dec
      return num.truncate
    end
    return num.truncate == num ? num.truncate : num
  end
  def variance(need_dec = true) # 方差
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    average=ary.average.to_f
    for i in 0...ary.size
      num+=((ary-average)**2).to_f
    end
    num=(num/ary.size).to_f
  end
  def deviation(need_dec = true) # 标准差
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    num=((ary.variance.to_f)**0.5).to_f # 标准差是方差的算术平方根
  end
  def range(need_dec = true) # 极差(是否使用浮点数)
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    if ary.size == 0
      raise ZeroDivisionError.new("divided by 0")
    end
    num = (ary.max-ary.min).to_f
    unless need_dec
      return num.truncate
    end
    return num.truncate == num ? num.truncate : num
  end
  def median(need_dec = true) # 中位数(是否使用浮点数)（需要从小到大排列）
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    ary=ary.sort # 从小到大重新排序
    if ary.size == 0
      raise ZeroDivisionError.new("divided by 0")
    end
    if ary.size%2==1
      num = ary[ary.size/2].to_f
    elsif ary.size%2==0
      num = (ary[(ary.size-1)/2+1]+ary[(ary.size+1)/2-1])/2.to_f
    end
    unless need_dec
      return num.truncate
    end
    return num.truncate == num ? num.truncate : num
  end
  def mode(need_dec = true) # 众数(是否使用浮点数)
    if self.include?(nil)
      ary = self.compact
    else
      ary = self
    end
    num = 0
    if ary.size == 0
      raise ZeroDivisionError.new("divided by 0")
    end
    modenum=[]
    ary=ary.sort # 从小到大重新排序
    for i in 0...ary.size # 计算每个数出现的次数
      if ary.is_a?(Numeric)
        if modenum[ary]==nil
          modenum[ary]=1
        else
          modenum[ary]+=1
        end
      else
        raise TypeError.new("connot convert #{ary.class} into Numeric")
      end
    end
    for i in 0...modenum.size # 填充数组nil元素
      if modenum==nil
        modenum=0
      end
    end
    modemax=modenum.max # 找出最大的数
    for i in 0...modenum.size # 找出最大的数的所在位置
      if modemax==modenum
        num=i
      end
    end
    unless need_dec
      return num.truncate
    end
    return num.truncate == num ? num.truncate : num
  end
  
end
[/pre]


另外lg和log函数楼主做的感觉有问题···

fux2

最多100行，不特意缩短行数，完成lz所有功能，这样根本不是在写ruby。

chd114

fux2 发表于 2014-7-4 16:28
最多100行，不特意缩短行数，完成lz所有功能，这样根本不是在写ruby。

什么最多100行···

RyanBern

感觉有些地方有问题，就当是对一些算法的练习吧。其实有些东西Math模块里就有吧应该。

1.有些东西着实不应该定义成Numeric类的普通方法，用起来感觉略微奇怪，比方说等差数列等比数列那个。
2.你这个log是给整数使的？这可不好。那定义在Numeric里面是啥意思呢？对于实数的log算法，我才不告诉你呢~
3.0的阶乘为什么不写进去？
4.求众数个人以为用Hash收集比较好吧。

taroxd

chd114 发表于 2014-7-4 16:30
什么最多100行···

100行代码完成楼主的所有功能

chd114

RyanBern 发表于 2014-7-4 16:30
感觉有些地方有问题，就当是对一些算法的练习吧。其实有些东西Math模块里就有吧应该。

1.有些东西着实不应 ...

就是家里断网的时候练着玩的···然后觉着有些纯新手不知道Math是可以用的就发了···0的阶乘我不清楚···阶乘老实说老师还没教我是自己摸索的···负数没阶乘也是后来才知道

chd114

taroxd 发表于 2014-7-4 16:36
100行代码完成楼主的所有功能

比如哪些可以精简的？

taroxd

chd114 发表于 2014-7-4 16:40
比如哪些可以精简的？

从头到尾没有不能精简的地方

chd114

taroxd 发表于 2014-7-4 16:42
从头到尾没有不能精简的地方

···return num.truncate == num ? num.truncate : num这一句？

taroxd

chd114 发表于 2014-7-4 16:42
···return num.truncate == num ? num.truncate : num这一句？

375行代码中的每一行都可以精简