<87eigde28n....@gmail.com>
<87d3vw8shu.wl%ucec...@ucl.ac.uk>
<87631o8ebj....@gmail.com>
<87wru4uhux.wl%ucec...@ucl.ac.uk>
<aanlktikoyclhdvuisb11vymrceivo9hx3n3rdrsow...@mail.gmail.com>
User-Agent: Wanderlust/2.15.9 (Almost Unreal) Emacs/23.2 Mule/6.0 
(HANACHIRUSATO)

Hello,

While I'm at it, I'd like to suggest asymptote as a neat tool to draw
all those graphs.

Here are two examples illustrating it (admittedly not so well for the
surface, but I explain why in my comments) :

#+begin_src asymptote
import graph3;
size(7cm,0);

currentprojection=orthographic(-4,-2,3);

// define function f(z), where z ( z.x , z.y )
real f(pair z) { return sin(z.x) + sin(z.y); }

// Drawing meshes (pen for surface is nullpen)
draw(surface(f,(-4,-4),(4,4),nx=30),nullpen,meshpen=red,nolight);

// Dumb axis but my asymptote version is too old for something
// more complex
xaxis3();
yaxis3();
zaxis3();
#+end_src

#+begin_src asymptote :file graph-asy-polar.pdf
import graph;
size(7cm,0);

// defining function and its graph
real f(real t) {return sqrt(2)/2-cos(3t);}
path Cf=polargraph(f,0,2pi,n=1440,operator ..)--cycle;

// drawing graph
draw(Cf,.8bp+red);

// axis and units
xaxis("$x$");
yaxis("$y$");
draw((0,0)--(1,0),.8bp+blue,Arrow());
draw((0,0)--(0,1),.8bp+blue,Arrow());
#+end_src

--
Nicolas

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to