(defun foo (n)
　　　　(lambda (i) (incf n i)))
看到很多说这个例子，但是怎么调用，刚接触lisp请大家不吝赐教

(funcall (foo 3) 2)

貌似返回了一个函数。是这样吧。。。好久没复习，都忘了

首先，你的函数写法有误，应该是：
（defun foo (n)
#'(lambda (i) (incf n i)))
该函数是一闭包结构，使用时应该是这样的：
（setf addn （foo 3））
此时REPL提醒生成闭包addn，然后现在可以调用addn了，调用方式为：
1. （funcall addn 4）
2. （apply addn '(4))
结构返回7
函数的意思是对给定的值n，没调用一次递加i。