Skip to content

Instantly share code, notes, and snippets.

@akond

akond/gist:c96df6fc07b687fb28d0

Last active March 24, 2016 19:02
Show Gist options
  • Save akond/c96df6fc07b687fb28d0 to your computer and use it in GitHub Desktop.
Save akond/c96df6fc07b687fb28d0 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(defn replace-nth [col n v]
(let [index (dec n)
eq? (partial = index)
to (empty col)]
(into to (map #(if (eq? %2) v %1) col (range)))))
(replace-nth [7 1 2 3 4 5 6 8] 4 "tttt")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment