From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.1.3 (2006-06-01) on yquem.inria.fr X-Spam-Level: X-Spam-Status: No, score=0.0 required=5.0 tests=none autolearn=disabled version=3.1.3 Received: from mail3-relais-sop.national.inria.fr (mail3-relais-sop.national.inria.fr [192.134.164.104]) by yquem.inria.fr (Postfix) with ESMTP id 90383BC6B for ; Sat, 10 Nov 2007 14:22:37 +0100 (CET) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AgAAAJI+NUfUGyobimdsb2JhbACPAwEBAQgEBgcKEQc X-IronPort-AV: E=Sophos;i="4.21,398,1188770400"; d="scan'208";a="5650357" Received: from smtp1-g19.free.fr ([212.27.42.27]) by mail3-smtp-sop.national.inria.fr with ESMTP; 10 Nov 2007 14:22:37 +0100 Received: from smtp1-g19.free.fr (localhost.localdomain [127.0.0.1]) by smtp1-g19.free.fr (Postfix) with ESMTP id DF6231AB2CF for ; Sat, 10 Nov 2007 14:22:36 +0100 (CET) Received: from svungoc-laptop.local (unknown [82.253.222.219]) by smtp1-g19.free.fr (Postfix) with ESMTP id AAECB1AB2B7 for ; Sat, 10 Nov 2007 14:22:36 +0100 (CET) From: Vu Ngoc San Organization: IRMAR To: caml-list@yquem.inria.fr Subject: Re: [Caml-list] 2D graphing and charting Date: Sat, 10 Nov 2007 14:22:35 +0100 User-Agent: KMail/1.9.6 (enterprise 0.20070907.709405) References: <200711080353.38303.jon@ffconsultancy.com> In-Reply-To: <200711080353.38303.jon@ffconsultancy.com> MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Message-Id: <200711101422.35960.san.vu-ngoc@univ-rennes1.fr> X-Spam: no; 0.00; graphing:01 ocaml:01 blabla:01 foo:01 foo:01 diamond:98 diamond:98 rec:01 caml-list:01 color:97 color:97 black:96 float:03 float:03 languages:03 Le Thursday 08 November 2007 04:53:37 Jon Harrop, vous avez =E9crit=A0: > I've been using Mathematica to render the graphs on our site, like the ray > tracer language comparison: > > http://www.ffconsultancy.com/languages/ray_tracer/results.html > > What free OCaml software might I use to do the same thing? I'd love to say: just write the following code, which produces the file http://perso.univ-rennes1.fr/san.vu-ngoc/images/oplot.eps But I can't, since I don't have any time to release "oplot" seriously befor= e=20 at least 6 months. So, sorry for the spam, I just couldn't resist :) San open Oplot;; open Oplotmain;; open Renderinit;; let dots () =3D let rec loop n l =3D if n =3D 0 then l else loop (n-1) ((Random.float 1., Random.float 1.)::l) in loop 50 [];; let view =3D view 0. 0. 1. 1.;; let a =3D axis 0. 0.;; let dots_bla =3D List.rev_map (fun (x,y) -> (x,y,"blabla")) (dots ());; let dots_foo =3D List.rev_map (fun (x,y) -> (x,y,"foofoo")) (dots ());; let d1 =3D label_dot_plot ~dot:diamond ~view dots_bla;; let d2 =3D label_dot_plot ~dot:diamond ~view dots_foo;; display ([Color black;view;a;Color red] & d1 & [Color blue] & d2) ~dev:gv;;