Scheme(Racket)获得一个随机布尔值,可能为0 <p <1

Question

在Racket方案中,获得随机布尔值的最佳方法是什么,其概率为0 <= p <= 1？

Answer 1

这是一个解决方案,您可以将概率显式化:

#lang racket
(require math)
(define d (discrete-dist '(#t #f) '(0.6 0.4)))
(sample d 10)

样本输出:

'(#f #t #t #t #t #f #t #f #f #t)