MathGroup Archive 2011

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

Search the Archive

Re: Ploting a transformation of a set

  • To: mathgroup at smc.vnet.net
  • Subject: [mg123337] Re: Ploting a transformation of a set
  • From: Ray Koopman <koopman at sfu.ca>
  • Date: Fri, 2 Dec 2011 07:20:29 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <jb4ov2$gma$1@smc.vnet.net>

On Nov 30, 12:19 am, Justin <justin.vala... at gmail.com> wrote:
> Hello,
> I would like to plot the following transformation of the set {x,y; x+y<2 & x>0 & y> 0} => {(x+.5y)^.5, (y+.5x)^.5}.
> Is there any way to do this in mathematica?
> thanks

xy = .2 Flatten[Table[{x,y},{x,0,10},{y,0,10-x}],1];
uv = Sqrt[xy.{{1,.5},{.5,1}}];
With[{plotstuff = {AspectRatio->Automatic, Frame->True, Axes->None,
                 Prolog->PointSize[.02], DisplayFunction->Identity}},
Show[GraphicsArray[{ListPlot[xy,plotstuff],ListPlot[uv,plotstuff]}],
     ImageSize->600]]



  • Prev by Date: using TeXForm to format user defined latex functions
  • Next by Date: Re: Orthogonalize[expr]
  • Previous by thread: Re: Ploting a transformation of a set
  • Next by thread: Re: Ploting a transformation of a set