Question

我需要一些地图方面的帮助。从数据库中获取jdbc/query的数据后，结果如下所示：

({:product_id 1, :name product1, :rating 3.000M}
 {:product_id 2, :name product2, :rating 1.333M}
 {:product_id 3, :name product3}, :rating nil)

我想用Selmer显示所有内容，但我只想在逗号后面只显示一个数字。像这样：

({:product_id 1, :name product1, :rating 3.0}
 {:product_id 2, :name product2, :rating 1.3}
 {:product_id 3, :name product3}, :rating nil)

我发现了，如何迭代地图，但我不知道如何更改具体值。查询数据保存在data

中

(doseq [keyval data]
  (doseq [keyval2 keyval]
    (doseq [keyval3 keyval2]
      (prn keyval3))))

您能帮我创建一个新的data变量吗？谢谢！

Answer 1

clojure数据是不可变的，因此您无法以通用方式更新它。而是使用clojure的数据操作函数制作数据副本，添加所需的更改。很好的介绍可以在这里找到：http://www.braveclojure.com/functional-programming/

所以你做的就是这样

user> (defn round-to [^Double num places] (when num (Math/round num)))
#'user/round-to ;; not-a-real-round-to (simplified for brevity)

user> (def data '({:product_id 1, :name product1, :rating 3.000M}
                  {:product_id 2, :name product2, :rating 1.333M}
                  {:product_id 3, :name product3, :rating nil}))
#'user/data

user> (map #(update % :rating round-to 2) data)
;;=> ({:product_id 1, :name product1, :rating 3} 
;;    {:product_id 2, :name product2, :rating 1} 
;;    {:product_id 3, :name product3, :rating nil})

Answer 2

(defn round2
  "Round a double to the given precision (number of significant digits)"
  [precision d]
  (let [factor (Math/pow 10 precision)]
    (/ (Math/round (* d factor)) factor)))

(map #(assoc % :rating (when-some [r (:rating %)] (round2 1 r)))
    '({:product_id 1, :name 'product1, :rating 3.000M}
      {:product_id 2, :name 'product2, :rating 1.333M}
      {:product_id 3, :name 'product3, :rating nil}))

Clojure：在地图上围绕bigInt

2 个答案: