scottlowe/fib.clj

Created July 16, 2011 23:13

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

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

Download ZIP

Clojure function which returns the first X fibonacci numbers

Raw

fib.clj

	(defn fib [max]
	(loop [a 1, b 1, acc [1]]
	(if (>= (count acc) max)
	acc
	(recur b (+ a b) (conj acc b)))))

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