表中相邻两个原子相减有简便的写法吗?
比如有表 '(a b c d e),想得到((- a b)(- b c) (- c d)(- d e)),请大家支招(setq a '(a b c d e))
(mapcar '(lambda (e1 e2) (list '- e1 e2)) (reverse (cdr (reverse a))) (cdr a))
(setq a '(a b c d e))
(mapcar '- a (cdr a)) (mapcar '(lambda (x y) (- x y)) lst (cdr lst))
页:
[1]