表中相邻两个原子相减有简便的写法吗?

defun

比如有表 '(a b c d e)，想得到((- a b)(- b c) (- c d)(- d e))，请大家支招

vectra

1. (setq a '(a b c d e))
   
2. 
   
3. 
   
4. (mapcar '(lambda (e1 e2) (list '- e1 e2)) (reverse (cdr (reverse a))) (cdr a))
   

(setq a '(a b c d e))<br /> <br /> <br /> (mapcar '(lambda (e1 e2) (list '- e1 e2)) (reverse (cdr (reverse a))) (cdr a))<br />

自贡黄明儒

2. (setq a '(a b c d e))
   
3. (mapcar '- a (cdr a))

(setq a '(a b c d e))<br /> (mapcar '- a (cdr a))

xyp1964

(mapcar '(lambda (x y) (- x y)) lst (cdr lst))

vlisp2012