Commentaires sur : Plugin ImageJ minimal en Clojure: inverser une image

Par : hamza

hamza — Sun, 28 Mar 2010 17:15:20 +0000

Je veux apprendre à reconnaître des formes géométriques dans le Image. Grâce à la technologie imageJ avec java et merci

Par : fmn

fmn — Fri, 15 Jan 2010 16:27:34 +0000

Thanks for the suggestion. The processing time with this version is 0.165s, ~10 million pixel/second, a good improvement. What is captivating with Clojure is that you can start with a version and granularly improve it.

Par : Godbe

Godbe — Fri, 15 Jan 2010 16:21:51 +0000

You can also use the let tric so no reflection is used when calling putPixel

(ns invert_clj
  (:gen-class
   :implements [ij.plugin.filter.PlugInFilter]))

(defn -setup [this arg im]
  ij.plugin.filter.PlugInFilter/DOES_8G)

(defn -run [this #^ij.process.ImageProcessor ip]
  (let [w (.getWidth ip)
        h (.getHeight ip)]
    (doseq [u (range w)
            v (range h)]
     (let [u1 (int u) v1 (int v)]
       (.putPixel ip u1 v1 (int (- 255 (.getPixel ip u1 v1))))))))