Генерация случайных чисел Haskell

Question

module Meth where 
import System.Random 



gen :: StdGen 
gen = mkStdGen 42 

shuffles:: StdGen->[(Int,Int)] 
shuffles g = take 28(randoms g :: [Int]) 

Я пытаюсь генерировать 28 случайных чисел, я получаю сообщение об ошибке ошибку

не может сравниться типа «Int» с «(Int, Int)» Ожидаемый тип : [(Int, Int)] Фактический тип: [Int] В выражении: взять 28 $ randoms g :: [Int] В уравнении для 'тасований': shuffles g = take 28 $ randoms g :: [Int]

Answer 1

Вы явно сказать, вы создаете список Int типов:

... (randoms g :: [Int]) 

Тогда вы говорите, что вы на самом деле хотите получить список пар Int с:

... -> [ (Int, Int) ] 

Что вы хотите? Если вы хотите пар затем разделить ваш генератор и застегивать два отдельных вызова к randoms:

shuffles:: StdGen->[(Int,Int)] 
shuffles g = 
    let (g1,g2) = split g 
    in take 28 $ zip (randoms g1) (randoms g2) 

Если вы просто хотите получить список Int с исправьте неверную подпись типа:

shuffles:: StdGen -> [Int] 
shuffles g = take 28 (randoms g)