10000的阶乘。。好帅。。

寒冷魔王

你会吓一跳的。。

数了一下，竟然有35660位。。
我对数学的敬仰程度又一次地上升了。。。

P.S.其实我是来卖萌的（PAI~）

stevenrock

卖萌可耻～

美丽晨露

这结果是多少位数啊。

myownroc

图论比数论帅!

长弓巡洋集团

算那么大的的数，机器在流血......
好在游戏里没有用上虚数、导数和回归函数......

taroxd

长弓巡洋集团 发表于 2015-2-6 07:37
算那么大的的数，机器在流血......
好在游戏里没有用上虚数、导数和回归函数...... ...

一万还好啦

(1..10000).inject :*

RyanBern

阶乘这种东西，玩玩就好。
不过应该体会到阶乘这东西是量级是很厉害的，所以编写算法时如果写出了一个复杂度为O(n!)的东西，那你就可以去面壁一会了。
lim(n->∞)10000^n/n!=0

BTW如果说大学数学里面，高数就是求导求积分，线性代数就是算行列式算矩阵逆的话，那数学是没啥好学的。
最起码，你要知道各种级数以及其收敛性理论，线性空间理论，Jordan标准型分解定理，这才是大学数学应该学的东西。

taroxd

RUBY 代码复制

def fact(n)
  return 1 if n == 0
  n * fact(n - 1)
end
 
def fact2(n, accumulator = 1)
  return accumulator if n == 0
  fact2(n - 1, n * accumulator)
end
 
p fact(4)
p fact2(4)

def fact(n)


  return 1 if n == 0


  n * fact(n - 1)


end


 


def fact2(n, accumulator = 1)


  return accumulator if n == 0


  fact2(n - 1, n * accumulator)


end


 


p fact(4)


p fact2(4)

后者是尾递归，前者不是。
前者的空间复杂度为 O(n)，后者是 O(1) （在打开尾递归优化的条件下，且不考虑数据越大占的空间越大）

寒冷魔王

taroxd 发表于 2015-2-6 11:09
def fact(n)
  return 1 if n == 0
  n * fact(n - 1)

有两个参数的话Lisp也能算了

通过参数传递这点我还真没想到，还是T君厉害

taroxd

寒冷魔王 发表于 2015-2-6 11:18
有两个参数的话Lisp也能算了
[fold][/fold]

其实就是迭代（我歪楼我自豪）

另外，我更喜欢 Ruby 版的 Lisp 方言（啥）不就是数不清楚括号么

RUBY 代码复制

fact = -> n {
  iter = -> n, accumulator {
    n.zero? ? accumulator : iter[n - 1, n * accumulator]
  }
  iter[n, 1]
}

fact = -> n {


  iter = -> n, accumulator {


    n.zero? ? accumulator : iter[n - 1, n * accumulator]


  }


  iter[n, 1]


}