Revision as of 17:42, 25 February 2017 (view source) Jaydub (talk \| contribs) m (<= instead of <) ← Older edit		Revision as of 17:54, 25 February 2017 (view source) Jaydub (talk \| contribs) m (let & loop -> loop) Newer edit →
Line 273: (defun find-median (histogram) (let*loop with ((num-pixels = (loop for count across histogram sum count)) with (half = (/ num-pixels 2))) ~~(loop~~ for count across histogram for i from 0 sum count into acc when (>= acc half) return i))) (defun gray->black&white-image (image)

Bitmap/Histogram: Difference between revisions

Bitmap/Histogram (view source)