Jamil/bigrams.hs

Created December 23, 2016 22:13

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Select an option

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/Jamil/6467d9f73a72a2cee0c514a7c02a82fe.js"></script>
Save Jamil/6467d9f73a72a2cee0c514a7c02a82fe to your computer and use it in GitHub Desktop.

Download ZIP

Simple Bigram Generation

Raw

	bigrams :: [String] -> [(String, String)]
	bigrams [x] = []
	bigrams (x:y:xs) = (x, y):(bigrams $ y:xs)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment