Re: Axes in Plot3D and ListPlot3D

*To*: mathgroup at smc.vnet.net*Subject*: [mg131229] Re: Axes in Plot3D and ListPlot3D*From*: Bob Hanlon <hanlonr357 at gmail.com>*Date*: Wed, 19 Jun 2013 01:27:50 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*Delivered-to*: l-mathgroup@wolfram.com*Delivered-to*: mathgroup-outx@smc.vnet.net*Delivered-to*: mathgroup-newsendx@smc.vnet.net*References*: <20130617102511.B69AD674E@smc.vnet.net>

Just include the coordinates in the Table data = Flatten[ Table[{x, y, Sin[x + y^2]}, {x, -3, 3, 1/16}, {y, -3, 3, 1/16}], 1]; ListPlot3D[data, AxesLabel -> {"x", "y", "z"}] Bob Hanlon On Mon, Jun 17, 2013 at 6:25 AM, Ray Koopman <koopman at sfu.ca> wrote: > Plot3D[Sin[x + y^2],{x,-3,3},{y,-3,3},AxesLabel->{"x","y","z"}] > > gives a plot that I thought I could duplicate by creating a table > > z = Table[Sin[x + y^2],{x,-3,3,1/4},{y,-3,3,1/4}]; > > and then using ListPlot3D: > > ListPlot3D[z,AxesLabel->{"x","y","z"},MeshRange->{{-3,3},{-3,3}}] . > > That gives a different view of the same surface, with the wrong labels > on the axes. To duplicate the Plot3D result I must transpose the array: > > ListPlot3D[Transpose@z > ,AxesLabel->{"x","y","z"},MeshRange->{{-3,3},{-3,3}}] > > That seems unreasonable. What have I missed? > Is it mentioned somewhere in the documentation? > >

**References**:**Axes in Plot3D and ListPlot3D***From:*Ray Koopman <koopman@sfu.ca>