Re: finding area in ListContourPlot

*To*: mathgroup at smc.vnet.net*Subject*: [mg116146] Re: finding area in ListContourPlot*From*: DrMajorBob <btreat1 at austin.rr.com>*Date*: Thu, 3 Feb 2011 05:31:33 -0500 (EST)

Use Cases to extract points. plot = ListContourPlot[ Table[Sin[x] Sin[y], {x, -3, 3, 0.1}, {y, -3, 3, 0.1}], Contours -> 7] points = Cases[plot, GraphicsComplex[x__] :> {x}, Infinity]; I'm not sure how you'll isolate precisely the points you want, but that's a start. Bobby On Wed, 02 Feb 2011 05:07:24 -0600, Sam McDermott <samwell187 at gmail.com> wrote: > Hi- > > I'm new to the site, and I've searched around a bit for the solution to > this problem, but the answer doesn't seem too tractable. The nearest > I've gotten was here: > https://groups.google.com/forum/?fromgroups#!searchin/comp.soft-sys.math.mathematica/finding$20area$20of$20a$20contour$20region/comp.soft-sys.math.mathematica/Hs6KIWL3fvE/DnZQm6joE0gJ > > I would like to find the area bounded by the 95% confidence level of an > object like <plotname>=ListContourPlot[<listname>,Contours->chimin+9.2]. > In the first place, I'm having trouble getting a list of the points that > bound the contour region. I can use FullForm[<plotname>], followed by > hunting through the (huge) FullForm output to do this, but I'd like to > automate the process since I'll have to do this operation for dozens of > contour plots. > > Any help finding the area of region bounded in ListContourPlot or at > least getting a list of points that define the region would be most > appreciated. > > Thanks very much, > Sam > -- DrMajorBob at yahoo.com