wolfram-mathematica - 数学中的 "Select any"

Question

mathematica 是否有类似“select any”的东西来获取列表中满足条件的任何元素？

Answer 1

如果您只想在第一个匹配元素之后返回，请将可选的第三个参数用于Select，这是要返回的最大结果数。所以你可以这样做

Any[list_List, crit_, default_:"no match"] := 
    With[{maybeMatch = Select[list, crit, 1]},
        If[maybeMatch =!= {},
            First[maybeMatch],
            default]

Mathematica 缺少一个很好的方法来表示找不到答案失败，因为它缺少多个返回值，或者 Haskell 的 Maybe 类型的等价物。我的解决方案是拥有一个用户可指定的默认值，这样您就可以确保您传递的内容很容易与有效答案区分开来。