[求助]：如何删除表中的任意一个元素

wzg

比如：
表为（1 2 3 4 5），搜索表中的各个元素，假如某个元素与变量相等（假设变量为3），则删除元素3，返回（1 2 4 5）

pglyxq

你是求程序还是求思路？
求程序给你写程序，求思路给你讲思路。

f5612140

指令: (setq a '(1 2 3 4 5))
(1 2 3 4 5)

指令: (vl-remove '3 a)
(1 2 4 5)

指令: (setq a '(1 2 3 4 5 3))
(1 2 3 4 5 3)

指令: (vl-remove '3 a)
(1 2 4 5)

走过小桥

三楼的方法不错
那么又如何向表中指定位置添加元素呢

aeo

命令: (setq a '(2 3 4 2. 3))
(2 3 4 2.0 3)

命令: (vl-remove 2 a)
(3 4 2.0 3)

用vl-remove-if 比较好.

wzg

(setq a '(2 3 4 2 7))
如何得到(2 3 4 7)，即把两个重复的数删除一个