珍しくエラーを吐いたのでメモ。 (defun xn () (let ((tb (make-hash-table))) (dotimes (a 10000 tb) ; (do-events) ;これが必要。 (let* ((p (f)) (n (gethash p tb))) (setf (gethash p tb) (if n (1+ n) 1)))))) (defun f () (let ((p 0)) (dotimes (- 2…

マクスウェルの速度分布は、定数を省略すると次のような形になる。 正規分布と比較すると、少し数値が大きい部分にせり出していて、平均に対して左右非対称である。ゲームでは正規分布に近い乱数を使うことが多いが、クリティカルボーナス(ある数値以上なら…