Телеграмм чат группы clojure

Size: a a a

Clojure — русскоговорящее сообщество

2021 February 12

Mikhail Kuzmin in Clojure — русскоговорящее сообщество

всем привет. какие есть варианты получше?

(reduce-kv (fn [acc k v]
               (assoc acc k
                      (reduce-kv (fn [acc k v]
                                   (assoc acc k (if (nil? v) ""  v))) {} v)))
             {}
             {:person
              {:firstName nil
               :lastName nil
               :middleName nil}
              :practitioner
              {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}})
  ;; => {:person {:firstName "", :lastName "", :middleName ""}, :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

https://github.com/weavejester/medley/blob/master/src/medley/core.cljc#L94-L119

GitHub

weavejester/medley

A lightweight library of useful Clojure functions. Contribute to weavejester/medley development by creating an account on GitHub.

источник

10:01пожаловаться #1

Igor Levdansky in Clojure — русскоговорящее сообщество

Денис Нибаев

всем привет. какие есть варианты получше?

(reduce-kv (fn [acc k v]
               (assoc acc k
                      (reduce-kv (fn [acc k v]
                                   (assoc acc k (if (nil? v) ""  v))) {} v)))
             {}
             {:person
              {:firstName nil
               :lastName nil
               :middleName nil}
              :practitioner
              {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}})
  ;; => {:person {:firstName "", :lastName "", :middleName ""}, :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

(clojure.walk/postwalk #(or % "") ... )

источник

10:18пожаловаться #2

ДН

Денис Нибаев... in Clojure — русскоговорящее сообщество

решил попробовать через specter, как раз в проекте уже используется, есть повод его изучить.
спасибо

источник

10:20пожаловаться #3

Sergey Trofimov in Clojure — русскоговорящее сообщество

Денис Нибаев

всем привет. какие есть варианты получше?

(reduce-kv (fn [acc k v]
               (assoc acc k
                      (reduce-kv (fn [acc k v]
                                   (assoc acc k (if (nil? v) ""  v))) {} v)))
             {}
             {:person
              {:firstName nil
               :lastName nil
               :middleName nil}
              :practitioner
              {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}})
  ;; => {:person {:firstName "", :lastName "", :middleName ""}, :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

(->> {:person {:firstName nil :lastName nil :middleName nil}
        :practitioner {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}}
       (clojure.walk/postwalk-replace {nil ""}))
=>
{:person {:firstName "", :lastName "", :middleName ""},
 :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

источник

10:35пожаловаться #4

Sergey Trofimov in Clojure — русскоговорящее сообщество

Sergey Trofimov

(->> {:person {:firstName nil :lastName nil :middleName nil}
        :practitioner {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}}
       (clojure.walk/postwalk-replace {nil ""}))
=>
{:person {:firstName "", :lastName "", :middleName ""},
 :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

это если исходная задача звучит как «заменить в мапе все значения nil на ""»

источник

10:37пожаловаться #5

Igor Levdansky in Clojure — русскоговорящее сообщество

Sergey Trofimov

(->> {:person {:firstName nil :lastName nil :middleName nil}
        :practitioner {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}}
       (clojure.walk/postwalk-replace {nil ""}))
=>
{:person {:firstName "", :lastName "", :middleName ""},
 :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

👍🏻

источник

10:39пожаловаться #6

Sergey Trofimov in Clojure — русскоговорящее сообщество

Sergey Trofimov

(->> {:person {:firstName nil :lastName nil :middleName nil}
        :practitioner {:firstName "1", :lastName nil, :middleName nil, :id "pr2", :role ""}}
       (clojure.walk/postwalk-replace {nil ""}))
=>
{:person {:firstName "", :lastName "", :middleName ""},
 :practitioner {:firstName "1", :lastName "", :middleName "", :id "pr2", :role ""}}

но это ощутимо медленнее, чем оригинальный вариант

источник

10:40пожаловаться #7

Igor Levdansky in Clojure — русскоговорящее сообщество

Если надо быстро и правильно, то да, лучше specter смотреть)

источник

10:46пожаловаться #8

Igor Levdansky in Clojure — русскоговорящее сообщество

Что-нибудь такое (setval [MAP-VALS MAP-VALS nil?] "" ...) нужная глубина и фильтр

источник

10:50пожаловаться #9

Sergey Trofimov in Clojure — русскоговорящее сообщество

ну, лично я не считаю, что менять в мапе nil на пустые строки — «правильно» 😊

источник

10:54пожаловаться #10

Igor Levdansky in Clojure — русскоговорящее сообщество

Ну, это от задачи уже зависит)

источник

10:55пожаловаться #11

Sergey Trofimov in Clojure — русскоговорящее сообщество

Igor Levdansky

Ну, это от задачи уже зависит)

ну вот я не могу представить себе задачу, где такое преобразование было бы оправдано

источник

10:58пожаловаться #12

Sergey Trofimov in Clojure — русскоговорящее сообщество

если ты работаешь с {:firstName nil :lastName nil :middleName nil}, а тебе прилетает {:firstName nil :lastName nil}, то никакие замены тебя не спасут

источник

10:59пожаловаться #13

Sergey Trofimov in Clojure — русскоговорящее сообщество

если ты работаешь с одним полем из 10, то нафига другие 9 замен

источник

10:59пожаловаться #14

Sergey Trofimov in Clojure — русскоговорящее сообщество

ну и в общем случае не всякий nil означает пустую строку, поэтому надо смотреть ещё и на имя ключа, чтобы решить, делать замену или нет

источник

11:00пожаловаться #15

Sergey Trofimov in Clojure — русскоговорящее сообщество

получается надёжней, понятней и эффективней такие замены делать при использовании поля, когда достаёшь из мапы и в том же контексте принимаешь решение о преобразовании вытащенных значений

источник

11:02пожаловаться #16

Igor Levdansky in Clojure — русскоговорящее сообщество

Ну, может тут во вне куда-то эта мапка уходит, где контракт что поля не nullable

источник

11:02пожаловаться #17

Sergey Trofimov in Clojure — русскоговорящее сообщество

Igor Levdansky

Ну, может тут во вне куда-то эта мапка уходит, где контракт что поля не nullable

плюс контракт, что поля не отсутствуют и т.д. 😊
берётся исходная мапа, соответствующая дефолтному контракту и в неё мержатся актуальные данные

источник

11:04пожаловаться #18

ДН

Денис Нибаев... in Clojure — русскоговорящее сообщество

Igor Levdansky

Что-нибудь такое (setval [MAP-VALS MAP-VALS nil?] "" ...) нужная глубина и фильтр

это хорошо, а есть вариант обработать такое?

{:a {:firstName nil
                  :lastName nil
                  :middleName nil
                  :snils nil
                  :email nil
                  :id "pat2"}
              :b nil}

источник

11:17пожаловаться #19

Igor Levdansky in Clojure — русскоговорящее сообщество

[MAP-VALS (multi-path [MAP-VALS] []) nil?]

источник

11:27пожаловаться #20