Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2010

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Graphics3D. How to join random points with a single line

  • To: mathgroup at smc.vnet.net
  • Subject: [mg113093] Re: Graphics3D. How to join random points with a single line
  • From: "M.Roellig" <markus.roellig at googlemail.com>
  • Date: Tue, 12 Oct 2010 13:51:34 -0400 (EDT)
  • References: <i916a3$j2p$1@smc.vnet.net>

On 12 Okt., 10:29, pikajap <deepstr... at hotmail.com> wrote:
> Hello everyone!
> HEllllllllllppppppppp, i need your help!
>
> I have this work to do:
>
> Generate n Random tridimensional points
>
> trid[n_]:=Table[{Random[],Random[],Random[]},{j,1,n}]
> that was easy in deed
>
> Then i need to use the Hue command so that when i graph the points none of them has the same color.
> Graphics3D[Tables[{Hue.....Pont[trid[n....
> But for the final point,
> i have to link all the points. Then i cant!!!
> Beacause when i use table, i get n times what i want!!!!
> please help out guys

Hi,

here is an example:

points = trid[100];
Graphics3D@{Line[
   points], {RGBColor[#], PointSize[Large], Point[#]} & /@ points}

I used RGBColor instead of Hue, because the 3-dim coordinates can
directly be put in.
Look up the help pages for Map (short notation \@) and pure functions.

Cheers,

Markus


  • Prev by Date: Re: Generation of polynomials
  • Next by Date: something nice I found today, return multiple values from a function
  • Previous by thread: Graphics3D. How to join random points with a single line
  • Next by thread: Re: Graphics3D. How to join random points with a single line