1
$\begingroup$

Based on this answer Coarse mesh of a sphere

 DiscretizeRegion[Sphere[], MaxCellMeasure -> #,AccuracyGoal -> 0] & /@ ({.001, .01, .1 } 4 Pi)

enter image description here

I would like to create a coarse mesh of a cylinder surface

zyl = ImplicitRegion[x^2 + y^2 == 1 && -1 <= z <= 1, {x, y, z}]
 DiscretizeRegion[zyl, MaxCellMeasure -> #,AccuracyGoal -> 0] & /@ ({.001, .01, .1 } 4 Pi)

enter image description here

As you can see the meshes aren't affected by MaxCellMeasure!

What's wrong here?

Thanks!

$\endgroup$
0

1 Answer 1

5
$\begingroup$
  • For 2 dimension embeded in 3 dimension,sometimes use MaxCellMeasure -> {"Length" -> #} or MaxCellMeasure -> {1 -> #}.
DiscretizeRegion[zyl, MaxCellMeasure -> {"Length" -> #}, 
   AccuracyGoal -> 0] & /@ ({.001, .02, .1} 4 Pi)

enter image description here

  • To generate coarse surface seems not so easy. We try to decrease the PlotPoints and MaxRecursion in ContourPlot3D.
TriangulateMesh[
 ContourPlot3D[x^2 + y^2 == 1, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, 
   PlotPoints -> 4, MaxRecursion -> 0, Mesh -> 0] // 
  DiscretizeGraphics, MaxCellMeasure -> 1]

enter image description here

$\endgroup$
1
  • $\begingroup$ Thanks for your answer. I tried around with the "Length" parameter but didn't get a coarse mesh ( ~10-20 triangles ) $\endgroup$ Nov 14, 2023 at 12:29

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.