Thank you, Ben.
If I think the map as a tree, then as a functor, what I do is 'fmap' (in
Haskell or some languages),
,as you say.
Thanks for saying that.
Does Algo supply things around Functor, Applicative and Monad?
I'm going to look at Algo.
Or anybody knows any other libraries or implementations around these things
in Clojure?
Regards,
Y.Kohyama
2013年7月27日土曜日 13時06分23秒 UTC+9 Ben:
>
> If the map is a tree with values at the leaves, then it's a functor and
> applying a function to the values is fmap.
>
>
> On Fri, Jul 26, 2013 at 6:02 PM, Dave Sann <dave...@gmail.com<javascript:>
> > wrote:
>
>> if you are thinking of the nested map as a sort of tree - which you seem
>> to be doing - then map-leaves or something similar might convey the intent.
>>
>> On Saturday, 27 July 2013 04:30:30 UTC+10, Jay Fields wrote:
>>>
>>> I'm not sure I'd call this more readable, but it's another option -
>>> using clojure.walk
>>>
>>> (defn deep-update-vals
>>> [m f & args]
>>> (let [f (fn [[k v]] (if (map? v) [k v] [k (apply f v args)]))]
>>> (clojure.walk/postwalk (fn [x] (if (map? x) (into {} (map f x)) x))
>>> m)))
>>>
>>>
>>> On Fri, Jul 26, 2013 at 2:06 PM, Jay Fields <j...@jayfields.com> wrote:
>>>
>>>> I defined update-vals in jry: https://github.com/**
>>>> jaycfields/jry/blob/master/**src/clojure/jry.clj#L74-L75<https://github.com/jaycfields/jry/blob/master/src/clojure/jry.clj#L74-L75>
>>>>
>>>> It doesn't traverse nested maps, but I haven't ever needed that ability
>>>> either.
>>>>
>>>> 1) I've never seen a name for that.
>>>> 2) not in core. I'm sure it's been written 50 times in various helper
>>>> libs.
>>>> 3) I'd probably write it like below, but I'm not convinced it's any
>>>> better.
>>>>
>>>> (defn deep-update-vals
>>>> [m f & args]
>>>> (if (map? m)
>>>> (reduce-kv #(assoc %1 %2 (apply deep-update-vals %3 f args)) {} m)
>>>> (apply f m args)))
>>>>
>>>>
>>>> On Fri, Jul 26, 2013 at 1:31 PM, Yoshinori Kohyama
>>>> <yyko...@gmail.com>wrote:
>>>>
>>>>> Thank you Gary.
>>>>> There's no reason why this need to be a macro.
>>>>> It has rewritten as a function.
>>>>>
>>>>> And I'd still like to hear any response about the same three questions.
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> (require '[clojure.test :refer (with-test is run-tests)])
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> (with-test
>>>>> (defn mapf [f m & args]
>>>>>
>>>>>
>>>>>
>>>>> ((fn g [n]
>>>>> (if (map? n)
>>>>>
>>>>>
>>>>>
>>>>> (into {} (map (fn [[k v]] [k (g v)]) n))
>>>>>
>>>>>
>>>>>
>>>>> (apply f n args)))
>>>>>
>>>>> m))
>>>>>
>>>>> (is (= (mapf #(* % %) {:a {:b 3 :c 4} :d 5})
>>>>>
>>>>>
>>>>>
>>>>> {:a {:b 9 :c 16} :d 25}))
>>>>>
>>>>>
>>>>>
>>>>> (is (= (mapf #(+ (* %1 %1) %2) {:a {:b 3 :c 4} :d 5} 1)
>>>>>
>>>>>
>>>>>
>>>>> {:a {:b 10 :c 17} :d 26})))
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> --
>>>>> You received this message because you are subscribed to the Google
>>>>> Groups "Clojure" group.
>>>>> To post to this group, send email to clo...@googlegroups.com
>>>>>
>>>>> Note that posts from new members are moderated - please be patient
>>>>> with your first post.
>>>>> To unsubscribe from this group, send email to
>>>>> clojure+u...@**googlegroups.com
>>>>>
>>>>> For more options, visit this group at
>>>>> http://groups.google.com/**group/clojure?hl=en<http://groups.google.com/group/clojure?hl=en>
>>>>> ---
>>>>> You received this message because you are subscribed to the Google
>>>>> Groups "Clojure" group.
>>>>> To unsubscribe from this group and stop receiving emails from it, send
>>>>> an email to clojure+u...@**googlegroups.com.
>>>>>
>>>>> For more options, visit
>>>>> https://groups.google.com/**groups/opt_out<https://groups.google.com/groups/opt_out>
>>>>> .
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>> --
>> --
>> You received this message because you are subscribed to the Google
>> Groups "Clojure" group.
>> To post to this group, send email to clo...@googlegroups.com<javascript:>
>> Note that posts from new members are moderated - please be patient with
>> your first post.
>> To unsubscribe from this group, send email to
>> clojure+u...@googlegroups.com <javascript:>
>> For more options, visit this group at
>> http://groups.google.com/group/clojure?hl=en
>> ---
>> You received this message because you are subscribed to the Google Groups
>> "Clojure" group.
>> To unsubscribe from this group and stop receiving emails from it, send an
>> email to clojure+u...@googlegroups.com <javascript:>.
>> For more options, visit https://groups.google.com/groups/opt_out.
>>
>>
>>
>
>
>
> --
> Ben Wolfson
> "Human kind has used its intelligence to vary the flavour of drinks, which
> may be sweet, aromatic, fermented or spirit-based. ... Family and social
> life also offer numerous other occasions to consume drinks for pleasure."
> [Larousse, "Drink" entry]
>
>
--
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
