# HG changeset patch # User Robert McIntyre # Date 1362593614 0 # Node ID 90b34cb842dedf8b140da548c382bf5d513bf2d4 # Parent 446300cb5ae7e4c3edd7bd46df637a7565d2957b playing around. diff -r 446300cb5ae7 -r 90b34cb842de org/gabor.org --- a/org/gabor.org Wed Mar 06 17:21:00 2013 +0000 +++ b/org/gabor.org Wed Mar 06 18:13:34 2013 +0000 @@ -11,7 +11,13 @@ #+name: gabor #+begin_src clojure -(ns cortex.gabor) +(ns cortex.gabor + (:import org.opencv.core.CvType) + (:import java.awt.image.BufferedImage) + (:import ij.ImagePlus) + (:use cortex.sense) + (:use cortex.util) + ) (defn load-opencv "Load the opencv native library. Must be called before any OpenCV @@ -20,8 +26,37 @@ (clojure.lang.RT/loadLibrary "opencv_java249")) +(defn convolve-practice [] + (let [input "/home/r/proj/cortex/images/dominos.jpg" + + + output "/home/r/ppp.png" + i (org.opencv.highgui.Highgui/imread input) + + ] + + + + (view (ImagePlus. input)) + (view (ImagePlus. output)) + + )) + + + + + + + +(comment + ;; these work + (def i (org.opencv.highgui.Highgui/imread + "/home/r/proj/cortex/images/dominos.jpg")) + + (org.opencv.highgui.Highgui/imwrite "/home/r/ppp.png" i) +) #+end_src