Haskellで範囲内の任意の数の乱数を含むリストを生成するには？

Question

私は与えられた範囲内の単一の乱数、乱数のリスト、乱数の数を含むリストを生成する方法を知っていますが、RANGE内の乱数を含むリストはありません。誰かが私にこれを助けることができますか？

このコード（haskell.orgから抜粋）は10個の乱数のリストを生成しますが、これを編集する方法については範囲を与える必要があります。

import System.Random 
import Data.List 

main = do 
seed <- newStdGen 
let rs = randomlist 10 seed 
print rs 

randomlist :: Int -> StdGen -> [Int] 
randomlist n = take n . unfoldr (Just . random) 

Answer 1

randomList :: (Random a) => (a,a) -> Int -> StdGen -> [a] 
randomList bnds n = take n . randomRs bnds 

System.RandomからrandomRsを使用します。

Answer 2

quickcheckは、乱数を生成するために使用することもでき、実際にはジェネレータを作成することをより理解しやすくする優れた結合子を持っています。あなたはsample'を利用することができ、このジェネレータを実行するには

t :: Int -> (Int,Int) -> Gen [Int] 
t n r = vectorOf n (choose r) 

：ジェネレータを定義

import Test.QuickCheck 

が続いて行うことができます。

あなただけの1つのモジュールをインポートする必要があり、それを使用するには

randomList n r = head `fmap` (sample' $ t n r)