Clojure 使用test.check生成排序数据

我想使用test.check生成表单的排序的时间序列数据

[[timestamp value][timestamp value]..]

其中，时间戳、值对按时间戳的升序排列

我可以很容易地以随机顺序生成这样的数据

（gen/tuple timestamp gen/int）

其中

时间戳

是例如

（gen/choose 1412664660 1423419720）

---

我应该如何生成排序数据

所以我在刷牙的时候想到了

当我问这个问题时，我认为我想要生成的数据“太低了一级”

（gen/tuple timestamp gen/int）

生成单个元组，我尝试对它们执行

（gen/fmap sort..）

操作无效，因为它只是对元组的内容进行排序。我需要生成这些元组的向量。。和

fmap排序

，当然可以：

(def entry (gen/tuple timestamp gen/int))
(def timeseries (gen/fmap sort (gen/vector entry)))

---

是否有理由不只是对其进行

fmap排序

？