如何解决当函数只假设交换等于 z 的值时,该函数正在用 y 替换整个列表
(defun replace (L z y)
(let ((f (lambda (x)
(if (equal x z)
y x) z y)))
(mapcar f L)))
(replace '(3 1 5 6 3 2 3) 3 9)
(9 9 9 9 9 9 9)
解决方法
您的 lambda
总是返回 y
,因为您的 z
后面有一个 y
和一个 if
。更改它以删除那些然后它就可以工作了:
(defun replace (L z y)
(let ((f (lambda (x)
(if (equal x z)
y
x))))
(mapcar f L)))
(replace '(3 1 5 6 3 2 3) 3 9)
(9 1 5 6 9 2 9)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。