Re: help with mathematica 5.2-Vector

*To*: mathgroup at smc.vnet.net*Subject*: [mg84493] Re: help with mathematica 5.2-Vector*From*: "Dr. Wolfgang Hintze" <weh at snafu.de>*Date*: Sat, 29 Dec 2007 19:59:12 -0500 (EST)*References*: <fl4unn$9o5$1@smc.vnet.net>

First define the points (and the origin o) as three dimensional vectors a = {1, 2, 3}; b = {2, 3, 4}; o = {0, 0, 0}; Then create the Graphics primitives using Line for the three vector differences OA, OB, AB lna = Line[{o, a}]; lnb = Line[{o, b}]; lnab = Line[{a, b}]; Then generate the corresponding Graphics objects. Notice that formatting has to go here (I have taken the freedom to color the three vectors in red, green, and blue): ga = Graphics3D[{RGBColor[0, 1, 0], Thickness[0.02], lna}]; gb = Graphics3D[{RGBColor[0, 0, 1], Thickness[0.02], lnb}]; gab = Graphics3D[{RGBColor[1, 0, 0], Thickness[0.02], lnab}]; Finally, show all objects together Show[gab, ga, gb]; Regards, Wolfgang "george" <mariuska1989 at hotmail.com> schrieb im Newsbeitrag news:fl4unn$9o5$1 at smc.vnet.net... > Hello! I started recently working with Mathematica 5.2 and I face a > problem that I'm trying to solve but I can't find the solution: I > have 2 vectors, let's say: > a=(1,2,3) > b=(2,3,4) > I want to make the graph for c=a-b(it should be an arrow, at > 3-Dimensions, right?). > I use the command ListPlot(c), nevertheless it produces cartesian > axes with 2 points(I suppose these are the heads of the arrows, but > I'm not sure). > Is there anything to do in order to make the correct graph? > (if the graph is not supposed to be an arrow, is not supposed to be > at 3-Dimensions, it would be really helpful if someone could explain > me why). > Thank you in advance. >