mihi-tr/ZeroPad.clj

Created August 22, 2014 15:21

Star 2 You must be signed in to star a gist
Fork 1 You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/mihi-tr/28b4d176dba7d33057e6.js"></script>
Save mihi-tr/28b4d176dba7d33057e6 to your computer and use it in GitHub Desktop.

Download ZIP

Zero Pad a number in Clojure

Raw

ZeroPad.clj

	(defn zp "Zero Pad numbers - takes a number and the length to pad to as arguments"
	[n c]
	(loop [s (str n)]
	(if (< (.length s) c)
	(recur (str "0" s))
	s)))

pavanivellal commented Feb 13, 2018 •

edited

(defn zp "Zero Pad numbers - takes a number and the length to pad to as arguments"
  [n &[c]]
  (if c
    (as-> c val
          (str "%0" val "d") 
          (format val n))
    (str n)))

abogoyavlensky commented Apr 4, 2021 •

edited

(defn zp
  "Zero Pad numbers - takes a number and the length to pad to as arguments"
  [n c]
  (format (str "%0" c "d") n))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment