comparison src/rlm/visualize.clj @ 4:12d1367cf1aa

updating various utilities
author Robert McIntyre <rlm@mit.edu>
date Thu, 01 Mar 2012 05:47:23 -0700
parents 78a630e650d2
children 1065e7d615a4
comparison
equal deleted inserted replaced
3:c8e35134bf8e 4:12d1367cf1aa
17 (import java.awt.Color) 17 (import java.awt.Color)
18 18
19 19
20 (defmethod visual ImagePlus 20 (defmethod visual ImagePlus
21 [image] 21 [image]
22 (.show image) 22 (.show image) image)
23 image)
24 23
25 (defmethod visual (class 4) 24 (defmethod visual (class 4)
26 [color] 25 [color]
27 (let [image (BufferedImage. 200 200 BufferedImage/TYPE_INT_RGB)] 26 (let [image (BufferedImage. 200 200 BufferedImage/TYPE_INT_RGB)]
28 (doall (for [y (range 200) x (range 200)] (.setRGB image x y color))) 27 (doall (for [y (range 200) x (range 200)] (.setRGB image x y color)))