如何检查一个序列是否增加+1增量clojure？

Question

我在clojure做扑克游戏我有一个像以下的功能:

(sort (map rank straight-hand))

按顺序返回手的等级

(2 3 4 5 6)

如何检查序列中前面的数字和当前数字的差值是1

Answer 1

(every? #{1} (map - (rest hand) hand))

这将验证从手中的下列项目中减去项目的每个结果都在集合中 #{1}