clojure.core / for与Cypher ExecutionResult

Question

(defn cypher
  [query]
  (let [result (-> *cypher* (.execute query))]
    (for [row result
          column (.entrySet row)]
      {(keyword (.getKey column))
       (Neo4jVertex. (.getValue column) *g*)})))

repl=> (cypher "start n=node:people('*:*') return n")
{:n #<Neo4jVertex v[1]>}

该查询返回两个结果，但是我只能使用clojure.core/for查看一个结果。 我应该怎么做？

Neo4j文档具有以下示例（这是我要模拟的示例）：

for ( Map<String, Object> row : result )
{
    for ( Entry<String, Object> column : row.entrySet() )
    {
        rows += column.getKey() + ": " + column.getValue() + "; ";
    }
    rows += "\n";
}

Answer 1

我认为您需要使用clojure.core/doseq （ docs ）。

user=> (doseq [row [1 2 3]]
  #_=>        [result [4 5 6]]
  #_=>   (println (str {:row row :result result}))))
{:row 1, :result 4}
{:row 1, :result 5}
{:row 1, :result 6}
{:row 2, :result 4}
{:row 2, :result 5}
{:row 2, :result 6}
{:row 3, :result 4}
{:row 3, :result 5}
{:row 3, :result 6}

因此，根据您的示例，可能会执行以下操作：

; ...
(doseq [row result]
       [column (.entrySet row)]
  (println (str {(keyword (.getKey column)) (Neo4jVertex. (.getValue column) *g*)}))))
; ...

注意， doseq返回nil ； 您必须在doseq表单的主体中调用诸如println之类的doseq 。

看起来clojure.core/for确实具有列表理解功能，因此类似下面的内容实际上返回一个列表：

user=> (for [row [1 2 3]
  #_=>       result [4 5 6]]
  #_=>   {:row row :result result})
({:row 1, :result 4} {:row 1, :result 5} {:row 1, :result 6} {:row 2, :result 4} {:row 2, :result 5} {:row 2, :result 6} {:row 3, :result 4} {:row 3, :result 5} {:row 3, :result 6})