Josh Beckman joshbeckman

Moving from jQuery

// jQuery
$(document).ready(function() {
  // code
})

	#!/usr/bin/clisp

	(defconstant ticks (list "▁" "▂" "▃" "▄" "▅" "▆" "▇" "█"))

	(defun spark (data-list)
	(let ((max-value (apply #'max data-list))
	(ticks-length (length ticks)))
	(let ((ticks-unit (/ max-value (- ticks-length 1))))
	(map 'list (lambda (x) (elt ticks (ceiling (/ x ticks-unit)))) data-list))))