fri*_*cke 4 recursion graph clojure datalog datomic
我目前正在评估 Datomic 用于存储和查询构成本体的已解析符号的用例。数据库中总共有 225122 个符号(实体)(所以它是一个相当大的本体,但对于 DB 来说应该不是什么大问题)。
结构非常标准,符号有
为了更好地访问符号,我们name为每个符号设置了唯一的。这加起来就是以下 Datomic 模式:
[{:db/ident :ml/name,
:db/valueType :db.type/string,
:db/cardinality :db.cardinality/one,
:db/unique :db.unique/identity}
{:db/ident :ml/parent,
:db/valueType :db.type/ref,
:db/index true,
:db/cardinality :db.cardinality/one}
{:db/ident :ml/superclass,
:db/valueType :db.type/ref,
:db/index true,
:db/cardinality :db.cardinality/one}]
Run Code Online (Sandbox Code Playgroud)
现在我有了最基本的递归查询“给我所有(传递)包含在符号中的符号p”。在数据方面:
(def rules
'[
[(ubersymbol ?c ?p) (?c :ml/parent ?p)]
[(ubersymbol ?c ?p) (?c :ml/parent ?c1) (ubersymbol ?c1 ?p) ]
])
(q '[:find ?c ?n :in $ % :where
(ubersymbol ?c ?d) [?d :ml/name "name of a root symbol"] [?c :ml/name ?n]]
current-db rules)
Run Code Online (Sandbox Code Playgroud)
查询本身(所以是一个中等大小的符号)需要5到5.5秒并返回 80 次点击。不是毫秒,而是真实秒。这只是我想询问的有关数据集的最基本查询(它旨在从网络工具中使用,以帮助建模者了解本体的结构)。
我正在运行datomic-pro-0.9.5554,使用内存数据库并使用对等库(我按照“入门”指南中的描述启动了服务器。
非常感谢为 Datomic 提供案例的帮助。
马库斯
由于fricke发现了由他本人,这是条款顺序的问题,但在查询,而不是在规则集。更有效的版本是:
[:find ?c ?n :in $ % :where
[?d :ml/name "name of a root symbol"]
(ubersymbol ?c ?d)
[?c :ml/name ?n]]
Run Code Online (Sandbox Code Playgroud)
可以通过以下方式进一步改进上述查询:
:ml/name产生:
(d/q
'[:find ?c ?n :in % $ ?d :where
(ubersymbol ?c ?d)
[?c :ml/name ?n]]
rules current-db [:ml/name "name of a root symbol"])
Run Code Online (Sandbox Code Playgroud)
我的理论是,您的规则不是以 Datalog 可以针对此读取模式优化的方式编写的 - 可能会导致遍历所有实体。我建议将它们重写如下:
[[(ubersymbol ?c ?p)
(?c :ml/parent ?p)]
[(ubersymbol ?c ?p)
;; we bind a child of the ancestor, instead of a parent of the descendant
(?c1 :ml/parent ?p)
(ubersymbol ?c ?c1)]]
Run Code Online (Sandbox Code Playgroud)
这种编写规则集的方式经过优化,可以找到某个节点的后代。您最初编写它的方式经过优化以找到某个节点的祖先。
在我的机器上使用 Datomic 0.9.5385 在 50000 个实体的平衡二叉树上进行的快速基准测试表明,第二种方法确实获得了所需的性能。
| 归档时间: |
|
| 查看次数: |
1373 次 |
| 最近记录: |