Re: Graphics questions
- To: mathgroup at smc.vnet.net
- Subject: [mg110034] Re: Graphics questions
- From: Murray Eisenberg <murray at math.umass.edu>
- Date: Sun, 30 May 2010 06:47:18 -0400 (EDT)
Actually, neither of the two 3D commands works -- until you tell us what
circls and coords are!
On 5/29/2010 4:44 AM, S. B. Gray wrote:
> Hello:
>
> Each of these display sequences works fine:
>
> Graphics3D[
> Table[Cylinder[{circls[[dx,1]],circls[[dx,1]]+.01*circls[[dx,3]]},
> circls[[dx,2]]],{dx,1,Length[circls]}]]
>
> and
>
> ListPointPlot3D[coords,PlotStyle->{PointSize[.025],RGBColor[1,0,0]},
> AxesLabel->{X,Y,Z},AspectRatio->1, LabelStyle->Directive[Blue, Bold,
> Medium],Filling->Bottom,FillingStyle->Directive[Blue,Thick]]
>
> but I do not know how to combine them in the same image, and I don't
> know how to put Opacity (or other directives such as EdgeForm) in the
> Cylinder display.
>
> Thanks for any tips.
>
> Steve Gray
>
>
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305