Bioinformatics/Sequence mutation: Difference between revisions

Content added Content deleted
Line 953:
insertElement i e xs = take i xs <> [e] <> drop i xs
swapElement i a xs = take (pred i) xs <> [a] <> drop i xs
randomIndex maxn = getStdRandom (randomR (1, maxn))
randomDNA = head . randoms <$> newStdGen