2007-08-06から1日間の記事一覧

関レレをGoogleで検索したら

関連検索が「しんや」「関レレ」でした。そんなに書いてたかな? 書いてたかも。コンスタントに毎月。。。

与えられた数字のケタ数

http://ja.doukaku.org/40/より。ふつうです。Integerを使ってIntの制限を越えられるようにしてみました。こういう場合は、Data.ListモジュールのgenericXXX関数を使います。 module Main (main) where import Data.List (genericLength) keta :: Integer ->…

20:00ごろ帰りました。

下降階乗羃と「組合せ型の最小完全ハッシュ関数」の逆関数

ふつうに組合せnCkをHaskellで書くとこうなります。数式は、n! / (k!・(n - k)!)です。 fact :: Int -> Int fact n = product [1 .. n] comb :: Int -> Int -> Int comb n k = fact n `div` (fact k * fact (n - k)) これを下降階乗羃(falling factorial)を…