如何删除列表中的相邻副本？

Question

如何使用方案编程删除列表中的相邻副本？

例如。

(2 2 4 6 7 7 32 32 4) 

成为

(2 4 6 7 32 4)