Message Boards Message Boards

1
|
2854 Views
|
1 Reply
|
3 Total Likes
View groups...
Share
Share this post:

creating a region

Posted 10 years ago

Hi,

How may I create a region bounded by two curves so as to determine its perimeter?region

POSTED BY: dgdg grgrg

You can play with your region this way:

f[x_] = Sin[10 x] + 3;
g[x_] = x^4 - 2 x^3 + x^2 + 1;
x0 = x /. FindRoot[f[x] == g[x], {x, -1}];
x1 = x /. FindRoot[f[x] == g[x], {x, 2}];
reg = ImplicitRegion[f[x] >= y >= g[x] && x0 <= x <= x1, {x, y}];
RegionPlot[reg]
RegionMeasure[DiscretizeRegion@reg]
RegionPlot[BoundaryDiscretizeRegion@reg]
RegionBoundary[BoundaryDiscretizeRegion@reg]
RegionMeasure[RegionBoundary[BoundaryDiscretizeRegion@reg]]
POSTED BY: Gianluca Gorni
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract