Re: Fit rectangle to set of points

*To*: mathgroup at smc.vnet.net*Subject*: [mg69337] Re: Fit rectangle to set of points*From*: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>*Date*: Thu, 7 Sep 2006 23:58:04 -0400 (EDT)*Organization*: Uni Leipzig*References*: <edom0n$hu2$1@smc.vnet.net>

Hi, points = Table[{Random[], Random[]}, {16}]; box = Transpose[{Min[#], Max[#]} & /@ Transpose[points]]; Show[Graphics[ {RGBColor[0, 0, 1], Rectangle @@ box, {AbsolutePointSize[4], RGBColor[1, 1, 0], Point /@ points}}, PlotRange -> All, Background -> RGBColor[1, 0, 0]]] or should the rectangle rotated ?? Regards Jens <buttgereit at biomediclab.de> schrieb im Newsbeitrag news:edom0n$hu2$1 at smc.vnet.net... | Dear Group, | | I have a set of 2D points given for which I would like to find the | smallest rectangle circumscribing all the points. | | Doing this with a circle instead of a rectangle was easy --- for the | rectangle I don't see the trick. | | Any hints? | | TIA + Best Regards, | | Peter |