random.scalaの修正

Haskellの直訳には囚われずに、Scalaとして短くなるように修正しました。

(このコミットの変更でなく、もとからの部分ですが)

`filter(i == _).length` は `.count(i == _)` のほうがいいですね