TransWikia.com

Plotting region with negative Gaussian curvature?

Mathematica Asked by brndt on December 10, 2020

I am plotting a surface using ParametricPlot3D. Is there a way that only the region with negative Gaussian curvature is plotted?

One Answer

There is a ResourceFunction that can compute Gaussian curvature which allows you to incorporate the comment by Ulrich Neumann

Clear[surf, curv]
surf[u_, v_] = ResourceFunction["Cyclide"][.3, 1.5, {u, v}];
curv[u_, v_] = 
  ResourceFunction["GaussianCurvature"][#, {u, v}] &@surf[u, v];
ParametricPlot3D[
 surf[u, v], {u, -[Pi], [Pi]}, {v, -2 [Pi], 2 [Pi]}, 
 RegionFunction -> Function[{u, v}, curv[u, v] < 0]]

Regions of negative curvature of a cyclide

Correct answer by Natas on December 10, 2020

Add your own answers!

Ask a Question

Get help from others!

© 2024 TransWikia.com. All rights reserved. Sites we Love: PCI Database, UKBizDB, Menu Kuliner, Sharing RPP