Open Source WEB

2006-07-13 [Gauche] 各要素が「0または1をとる乱数」から成る長さnのリストを得よ

別の方法を考えてみた． 

(use srfi-27)

(define (make-binary-random-list n)
  (map digit->integer (string->list (format #`"~,|n|,,'0b" (random-integer (expt 2 n))))))

これで本当に 0, 1 がランダムになるんだろうか？

--nobsun

Name:
Comment:

There is no comment.

Created: 2006-07-28 14:03:51(+0900) by nobsun
Modified: 2006-08-02 10:06:28(+0900) by bizenn

このサイトは、 IPA の「平成15年度オープンソフトウエア活用基盤整備事業」 の委託事業として開発されたKahuaで試験的に運用しております。

Copyright (c) 2004-2007 株式会社タイムインターメディア　About Us