| Author |
Comment/Response |
Bill
|
09/22/10 5:43pm
Hi:
I'm not certain that this is exactly what you want, but try this...
p = ContourPlot[x^2 + y^2 == 1, {x, -2, 2}, {y, -2, 2},
ContourStyle -> Red, AspectRatio -> 1]
Cases[p, _GraphicsComplex, Infinity][[1]] /.
GraphicsComplex[points_, poly_, ___] :> points
Hth,
Bill
URL: , |
|