Bitmap/Histogram: Difference between revisions
→{{header|Racket}}
(=={{header|Racket}}== implementation added) |
|||
Line 934:
=={{header|Racket}}==
<img src="http://timb.net/images/RC/Bitmap/Histogram/histogram-racket-0.25.png" alt="histogram-racket-0.25.png"></img>▼
<img src="http://timb.net/images/RC/Bitmap/Histogram/histogram-racket-0.50.png" alt="histogram-racket-0.50.png"></img>▼
<img src="http://timb.net/images/RC/Bitmap/Histogram/histogram-racket-0.75.png" alt="histogram-racket-0.75.png"></img>▼
<lang racket> #lang racket
(require racket/draw math/statistics racket/require
Line 1,001 ⟶ 996:
(send (bitmap->monochrome 1/2 bm) save-file "histogram-racket-0.50.png" 'png) ; median
(send (bitmap->monochrome 3/4 bm xs ws) save-file "histogram-racket-0.75.png" 'png)))</lang>
{{out}}
[http://timb.net/images/RC/Bitmap/Histogram/271px-John_Constable_002.jpg Original Image],
▲
▲
▲
Sorry guys... I just give up on linking/displaying these images any other way!
=={{header|Ruby}}==
| |||