Re: ListPointPlot3D - how to join points

• To: mathgroup at smc.vnet.net
• Subject: [mg105361] Re: [mg105338] ListPointPlot3D - how to join points
• From: "David Park" <djmpark at comcast.net>
• Date: Sun, 29 Nov 2009 05:11:49 -0500 (EST)
• References: <20435088.1259389725448.JavaMail.root@n11>

```You could try something like:

my3Dtable = {{0, 0, 0}, {1, 1, 1}, {2, 1, 2}, {3, 4, 3}, {5, 6,
4}, {3, 4, 5}, {2, 1, 6}, {7, 7, 7}};

Graphics3D[
{Line[my3Dtable],
AbsolutePointSize[4],
Point /@ my3Dtable},
Axes -> True]

Or in Version 7:

Graphics3D[
{BSplineCurve[my3Dtable],
AbsolutePointSize[4],
Point /@ my3Dtable},
Axes -> True]

But I'm not certain how one obtains a smooth interpolated curve that goes
through all the points.

David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/

From: Serych Jakub [mailto:Serych at panska.cz]

Dear community,
I need to draw 3D curve from the points in the table, something what in 2D
is very simply realizable by ListPlot with use of the Joined and
InterpolationOrder options. But ListPlot3D function is drawing curved plains
to me and I cannot join the points in  ListPointPlot3D function.
Does anybody know, how to do it? Here are some simple test data to let you

my2Dtable = {{0, 0}, {1, 1}, {2, 1}, {3, 2}, {4, 5}, {5, 8}, {6, 5}, {7,
4}};
ListPlot[my2Dtable, Joined -> True, InterpolationOrder -> 2]
my3Dtable = {{0, 0, 0}, {1, 1, 1}, {2, 1, 2}, {3, 4, 3}, {5, 6, 4}, {3, 4,
5}, {2, 1, 6}, {7, 7, 7}};
ListPointPlot3D[my3Dtable]
ListPlot3D[my3Dtable]

Thanks in advance for any help

Jakub

```

• Prev by Date: Re: ListPointPlot3D - how to join points
• Next by Date: Re: distorting an image
• Previous by thread: Re: ListPointPlot3D - how to join points
• Next by thread: Re: How to make {f,g}[a,b,c] to become