Re: Fancy 3d plotting in Mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg59922] Re: [mg59850] Fancy 3d plotting in Mathematica
- From: "Jose Luis Gomez" <jose.luis.gomez at itesm.mx>
- Date: Thu, 25 Aug 2005 06:34:31 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Mike, the standard Add-On library Graphics`Graphics3D has a command ShadowPlot3D that can be used to produce graphs similar to the one you want. Look at the example in the following link: http://homepage.cem.itesm.mx/jose.luis.gomez/shadowplot3d/ Regards! José Luis -----Mensaje original----- De: mike_in_england2000 at yahoo.co.uk [mailto:mike_in_england2000 at yahoo.co.uk] Enviado el: Miércoles, 24 de Agosto de 2005 05:30 a.m. Para: mathgroup at smc.vnet.net Asunto: [mg59850] Fancy 3d plotting in Mathematica Hi Using 3D plot I can make a very nice surface plot of the sinc function: Plot3D[Sin[Sqrt[x*x + y*y]]/Sqrt[x*x + y*y], {x, -10, 10}, {y, -10, 10}, PlotRange -> All] and I can do Contour plots: ContourPlot[Sin[Sqrt[x*x + y*y]]/Sqrt[x*x + y*y], {x, -10, 10}, { y, -10, 10}, PlotRange -> All] And all this is very nice. However is it straightforward to combine these plots a la Gnuplot: http://chem.skku.ac.kr/~wkpark/tutor/gnuplot/gpdocs/imgs/contours17.png Thanks for your time Mike
