好的。由于我自己找到了答案 - 我将其发布在这里以防有人搜索:
解决方案是构建两个 datomic 查询,将第一个的输出传递到第二个。
(->>
(d/q '[:find (count ?b) ?a :where [?a :author/books ?b]] db)
(d/q '[:find (max ?count) ?a :in $ [?count ?a]] db))
据我所知,这是在 datomic 中处理不太重要的查询的常用方法 - 将其拆分为几个子查询并链接在一起,让数据库完成它的工作。