For example: (defun fibonacci (n) "Generate the first N numbers in the Fibonacci sequence using the golden ratio." (let ((phi (/ (+ 1 (sqrt 5)) 2))) (mapcar (lambda (x) (round (/ (expt phi x) (sqrt 5)))) (number-sequence 0 n))))