Skip to content

Instantly share code, notes, and snippets.

@jclaggett

jclaggett/sparkline.clj

Last active December 30, 2015 09:09
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jclaggett/7807482 to your computer and use it in GitHub Desktop.
Save jclaggett/7807482 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
sparkline.clj
(defn sparkline [values]
(let [low (apply min values)
high (apply max values)
bars "▁▂▃▄▅▆▇█"
step (/ (- high low) (dec (count bars)))
scale #(nth bars (int (/ (- % low) step)))]
(apply str (map scale values))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment