Re: ListPlot3D Scatter Plot
- To: mathgroup at smc.vnet.net
- Subject: [mg61172] Re: ListPlot3D Scatter Plot
- From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
- Date: Tue, 11 Oct 2005 06:29:57 -0400 (EDT)
- Organization: Uni Leipzig
- References: <difuc7$h02$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi, data = Table[Sin[Pi^2*i*j/(100^2)] // N, {i, 0, 100}, {j, 100}]; ListPlot3D[data] Show[Graphics3D[MapIndexed[Point[Append[#2, #1]] &, data, {2}], BoxRatios -> {1, 1, 1}]] Show[Graphics3D[Line /@ MapIndexed[Append[#2, #1] &, data, {2}], BoxRatios -> {1, 1, 1}]] Show[Graphics3D[Line /@ Transpose[MapIndexed[Append[#2, #1] &, data, {2}]], BoxRatios -> {1, 1, 1}]] Regards Jens <dkjk at bigpond.net.au> schrieb im Newsbeitrag news:difuc7$h02$1 at smc.vnet.net... | Hi group, | | I have an array of the form | | Table[f[i,j],{i,0,100},{j,100}] | | which I would like to plot as a three-dimensional scatter plot. I am | aware of ScatterPlot3D, but this will not accept an array argument of | this form. | | Any help is appreciated. | | Thanks in advance. | | James |