2015年4月25日土曜日

150425(2)

Ruby


p(n | 和因子は奇数)

オンライン整数列大辞典の
A069878(http://oeis.org/A069878/list)
に載っていなかったので、
p(100000 | 和因子は奇数)を求めてみた。

n = 10 ** 5
ary = []
1.step(n, 2){|i| ary << i}
ps = Array.new(n + 1){0}
ps[0] = 1
ary.each{|num|
  (num..n).each{|i|
    ps[i] += ps[i - num]
  }
}
p ps[n]

出力結果
42494159403332317292526619504218136903700576932083624292980870857936616016516019
12151502208964867232719338338068057175972722741603682118374467405145719404171114
14290856263711241960579022839958369762391816708218000004037412323259921968871341
72550

0 件のコメント:

コメントを投稿

注: コメントを投稿できるのは、このブログのメンバーだけです。