Communities

Writing
Writing
Codidact Meta
Codidact Meta
The Great Outdoors
The Great Outdoors
Photography & Video
Photography & Video
Scientific Speculation
Scientific Speculation
Cooking
Cooking
Electrical Engineering
Electrical Engineering
Judaism
Judaism
Languages & Linguistics
Languages & Linguistics
Software Development
Software Development
Mathematics
Mathematics
Christianity
Christianity
Code Golf
Code Golf
Music
Music
Physics
Physics
Linux Systems
Linux Systems
Power Users
Power Users
Tabletop RPGs
Tabletop RPGs
Community Proposals
Community Proposals
tag:snake search within a tag
answers:0 unanswered questions
user:xxxx search by author id
score:0.5 posts with 0.5+ score
"snake oil" exact phrase
votes:4 posts with 4+ votes
created:<1w created < 1 week ago
post_type:xxxx type of post
Search help
Notifications
Mark all as read See all your notifications »
Q&A

Welcome to Software Development on Codidact!

Will you help us build our independent community of developers helping developers? We're small and trying to grow. We welcome questions about all aspects of software development, from design to code to QA and more. Got questions? Got answers? Got code you'd like someone to review? Please join us.

Post History

50%
+0 −0
Q&A Add single element for multiple keys to map

(merge m1 (zipmap ks (repeat itm))) Demonstration: $ clj Clojure 1.10.3 user=> (def m1 {:a 1 :b 2}) #'user/m1 user=> (def itm 3) #'user/itm user=> (def ks [:c :d :e]) #'user/ks u...

posted 3y ago by NoahTheDuke‭  ·  edited 3y ago by NoahTheDuke‭

Answer
#2: Post edited by user avatar NoahTheDuke‭ · 2021-11-16T15:42:24Z (about 3 years ago)
Add clj command and Clojure version to repl output
  • `(merge m1 (zipmap ks (repeat itm)))`
  • Demonstration:
  • ```clojure
  • user=> (def m1 {:a 1 :b 2})
  • #'user/m1
  • user=> (def itm 3)
  • #'user/itm
  • user=> (def ks [:c :d :e])
  • #'user/ks
  • user=> (merge m1 (zipmap ks (repeat itm)))
  • {:a 1, :b 2, :c 3, :d 3, :e 3}
  • ```
  • * [`repeat`](https://clojuredocs.org/clojure.core/repeat) returns a lazy sequence of the given item.
  • * [`zipmap`](https://clojuredocs.org/clojure.core/zipmap) returns a map with the first input (keys) mapped to the second input (vals), and it stops building the map when either input runs out of elements. In this case, it will be the given vector of keys.
  • * [`merge`](https://clojuredocs.org/clojure.core/merge) merges all of the input maps into a single map, left-to-right (so any repeated keys will overwrite previous keys).
  • `(merge m1 (zipmap ks (repeat itm)))`
  • Demonstration:
  • ```clojure
  • $ clj
  • Clojure 1.10.3
  • user=> (def m1 {:a 1 :b 2})
  • #'user/m1
  • user=> (def itm 3)
  • #'user/itm
  • user=> (def ks [:c :d :e])
  • #'user/ks
  • user=> (merge m1 (zipmap ks (repeat itm)))
  • {:a 1, :b 2, :c 3, :d 3, :e 3}
  • ```
  • * [`repeat`](https://clojuredocs.org/clojure.core/repeat) returns a lazy sequence of the given item.
  • * [`zipmap`](https://clojuredocs.org/clojure.core/zipmap) returns a map with the first input (keys) mapped to the second input (vals), and it stops building the map when either input runs out of elements. In this case, it will be the given vector of keys.
  • * [`merge`](https://clojuredocs.org/clojure.core/merge) merges all of the input maps into a single map, left-to-right (so any repeated keys will overwrite previous keys).
#1: Initial revision by user avatar NoahTheDuke‭ · 2021-11-16T15:41:34Z (about 3 years ago)
`(merge m1 (zipmap ks (repeat itm)))`

Demonstration:
```clojure
user=> (def m1 {:a 1 :b 2})
#'user/m1
user=> (def itm 3)
#'user/itm
user=> (def ks [:c :d :e])
#'user/ks
user=> (merge m1 (zipmap ks (repeat itm)))
{:a 1, :b 2, :c 3, :d 3, :e 3}
```

* [`repeat`](https://clojuredocs.org/clojure.core/repeat) returns a lazy sequence of the given item.
* [`zipmap`](https://clojuredocs.org/clojure.core/zipmap) returns a map with the first input (keys) mapped to the second input (vals), and it stops building the map when either input runs out of elements. In this case, it will be the given vector of keys.
* [`merge`](https://clojuredocs.org/clojure.core/merge) merges all of the input maps into a single map, left-to-right (so any repeated keys will overwrite previous keys).