MathGroup Archive 2002

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

Search the Archive

Re: experimental set of points

  • To: mathgroup at
  • Subject: [mg33181] Re: experimental set of points
  • From: Jens-Peer Kuska <kuska at>
  • Date: Thu, 7 Mar 2002 02:23:30 -0500 (EST)
  • Organization: Universitaet Leipzig
  • References: <a64gg1$n16$>
  • Reply-to: kuska at
  • Sender: owner-wri-mathgroup at


Block[{x, y},
    data = Table[(x = Random[]; y = Random[]; {x, y, x*y + x + y}),

ff = Fit[data, {x, y, y*x}, {x, y}];

Block[{$DisplayFunction = Identity}, 
    g1 = Plot3D[Evaluate[ff], {x, 0, 1}, {y, 0, 1}];
    g2 = Graphics3D[Point /@ data];
Show[g1, g2]

does this.


"Juan E. Fuentes" wrote:
> I have the following problem: An experimental set of points, which have
> each three coordinates Y,x1 and x2 and I did with the Fit or Regress
> functions the fit of the points succesfully. Now I want to plot the
> function and the points. The fitting function was plotted with the
> Plot3D but I could'n figure out how to plot the set points. ListPlot3D
> gave an error message that the point could have only two coordinate.
> Any hint will help me.  Thanks in advance, Juan

  • Prev by Date: Re: Stupid newbie question
  • Next by Date: Re: experimental set of points
  • Previous by thread: experimental set of points
  • Next by thread: Re: experimental set of points