为何在update上下文中drop-while未按预期工作而map正常？

你遇到的问题核心是对drop-while函数的作用理解有误，咱们一步步拆解：

为什么drop-while even?没生效？ #

drop-while的逻辑是：从序列开头开始，丢弃所有满足条件的元素，直到遇到第一个不满足条件的元素，然后返回剩下的所有元素（包括这个不满足的元素）。

看你的输入向量[1 2 3 4 5 6 7 8]，第一个元素是1，(even? 1)返回false——这意味着drop-while从一开始就找不到需要丢弃的元素，所以直接返回了整个原序列，这就是你看到结果没变化的原因。

而你第一个例子里用map even?是对的，因为map会遍历每个元素，对每个元素执行判断，所以能得到每个元素对应的布尔值序列。

正确实现“仅保留奇数元素”的方式 #

如果你想要过滤掉所有偶数，只保留奇数，应该用filter或者remove函数：

方案1：用filter odd? #

(deftest test-weird 
  (let [x {:nums [1 2 3 4 5 6 7 8]} 
        res (update x :nums #(filter odd? %))] 
    (println res)))

执行后会输出：{:nums (1 3 5 7)}

方案2：用remove even? #

和上面效果等价，只是换了一种表述方式：

(deftest test-weird 
  (let [x {:nums [1 2 3 4 5 6 7 8]} 
        res (update x :nums #(remove even? %))] 
    (println res)))

补充：drop-while的正确使用场景 #

举个例子，如果你的向量是[2 4 6 1 3 5]，这时候用drop-while even?就会生效：

(deftest test-drop-while-example
  (let [x {:nums [2 4 6 1 3 5]}
        res (update x :nums #(drop-while even? %))]
    (println res)))

输出会是{:nums (1 3 5)}，因为开头的偶数都被丢弃了，直到遇到第一个奇数1。

内容的提问来源于stack exchange，提问作者Paul C