ocaml-faces
OCaml library for face detection using OpenCV
Requirements
swig >=2.0.x@http://www.swig.org/opencv >=2.4.5@http://opencv.willowgarage.com/wiki/oasis >=0.3@http://oasis.forge.ocamlcore.org/- optional
*** On Mac OSX:
brew update
brew install opam python swig
opam update && opam install oasis
brew tap homebrew/science
pip install numpy
brew install opencv
*** On Debian:
sudo -i
wget http://sourceforge.net/projects/swig/files/swig/swig-2.0.9/swig-2.0.9.tar.gz
tar -xvzf swig-2.0.9.tar.gz && cd swig-2.0.9
./configure && make && make install
apt-get install libopencv-*
touch /dev/raw1394 && chmod a+rw /dev/raw1394
Installation
ocaml setup.ml -configure
ocaml setup.ml -build
ocaml setup.ml -install
Usage
(* Intialization *)
Ofaces.set_scale 1.0;;
Ofaces.set_min_size 30;;
Ofaces.set_cascade_name "haarcascades/haarcascade_frontalface_alt_tree.xml";;
match Ofaces.init () with
| 0 ->
(* Detect some faces *)
let faces = Ofaces.detect_faces_file "pic.jpg" in
Printf.printf "Detected %d face(s)\n" (List.length faces)
| _ ->
Printf.printf "There was an error initializing Ofaces library";;