Elisp中的滤波函数

Question

Emacs中是否存在与高阶函数filter等价的函数？类似于python或Javascript的函数。

(filter-equivalent (lambda (n) (= (% n 2) 0)) '(1 2 3 4 5 6 7 8))

==> (2 4 6 8)

Answer 1

我是cl-remove-if-not。有点口香糖，但有效。

要详细说明一下，你需要

(require 'cl-lib)

得到这个函数。它有一个别名，名为remove-if-not，但我不愿使用它，因为它可能看起来像在使用来自cl的remove-if-not。

包含前缀是一种很好的做法，不是在using namespace std中使用C++，而是每次都使用std::cout。

Answer 2

第三方dash.el库提供了一个-filter函数作为cl-remove-if-not的替代方案。

(-filter 'evenp '(1 2 3 4 5 6 7 8))

;; => (2 4 6 8)