On Wed, Dec 17, 2008 at 9:53 PM, Mark Engelberg
<mark.engelb...@gmail.com> wrote:
>
> This shaves 14 characters off of Chouser's solution:
> (defn enc[s e](apply str(map(apply hash-map(take-nth 2 e))s)))

Which leads me to this, though it fails for reasons that escape me:

(defn enc[s e](apply str(map`{~@(take-nth 2 e)}s)))

But here's a form that works, oddly, and still manages to shave off a
couple chars:

(defn enc[s e](apply str(map`{0~@(cons 0(take-nth 2 e))}s)))

--Chouser

--~--~---------~--~----~------------~-------~--~----~
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
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
-~----------~----~----~----~------~----~------~--~---

Reply via email to