我是LISP的新手.我正在尝试在CLISP中编写一个函数来生成前n个Fibonacci系列.
这就是我到目前为止所做的.
(defun fibonacci(n)
(cond
((eq n 1) 0)
((eq n 2) 1)
((+ (fibonacci (- n 1)) (fibonacci (- n 2))))))))
该程序打印出第n个Fibonacci系列.我正在尝试修改它以便打印系列,而不仅仅是第n个术语.
是否可以仅使用基本功能在单个递归函数中执行此操作？