Skip to main content
added 179 characters in body
Source Link
kglr
  • 400.5k
  • 18
  • 488
  • 929
pieces2 = BoundaryDiscretizeRegion /@ 
  (Graphics`PolygonUtils`PolygonIntersection[#, Polygon[CirclePoints[100]]] &/@ 
    MeshPrimitives[voronoi, 2]); // AbsoluteTiming // First

1.09499

(vs 33.0193 for pieces = ...)

Show[pieces2]

enter image description here

With 1000 points it takes 11.3679 seconds to get pieces2, and Show[pieces2] gives:

enter image description here

pieces2 = BoundaryDiscretizeRegion /@ 
  (Graphics`PolygonUtils`PolygonIntersection[#, Polygon[CirclePoints[100]]] &/@ 
    MeshPrimitives[voronoi, 2]); // AbsoluteTiming // First

1.09499

(vs 33.0193 for pieces = ...)

Show[pieces2]

enter image description here

pieces2 = BoundaryDiscretizeRegion /@ 
  (Graphics`PolygonUtils`PolygonIntersection[#, Polygon[CirclePoints[100]]] &/@ 
    MeshPrimitives[voronoi, 2]); // AbsoluteTiming // First

1.09499

(vs 33.0193 for pieces = ...)

Show[pieces2]

enter image description here

With 1000 points it takes 11.3679 seconds to get pieces2, and Show[pieces2] gives:

enter image description here

Source Link
kglr
  • 400.5k
  • 18
  • 488
  • 929

pieces2 = BoundaryDiscretizeRegion /@ 
  (Graphics`PolygonUtils`PolygonIntersection[#, Polygon[CirclePoints[100]]] &/@ 
    MeshPrimitives[voronoi, 2]); // AbsoluteTiming // First

1.09499

(vs 33.0193 for pieces = ...)

Show[pieces2]

enter image description here