-5
$\begingroup$

How can I plot the convex hull for some points in 3D

For example: I want the convex hull for (4,0,0), (2,0,4), (0,1,6), (0,0,10), (0,4,0)

If there are some ways to find it I need to know it.

Thank you

$\endgroup$

closed as off-topic by ubpdqn, MarcoB, m_goldberg, happy fish, Kuba Feb 22 '17 at 6:20

This question appears to be off-topic. The users who voted to close gave this specific reason:

  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – ubpdqn, MarcoB, m_goldberg, happy fish, Kuba
If this question can be reworded to fit the rules in the help center, please edit the question.

  • $\begingroup$ did you do some search before asking? $\endgroup$ – Ali Hashmi Feb 22 '17 at 2:41
  • $\begingroup$ Yes I did but I did not get what I want :) Thank you for your help $\endgroup$ – Ateq Alsaadi Feb 22 '17 at 2:44
  • 3
    $\begingroup$ -1 because I cannot find a single way to search for this that does not immediately give you the answer. Did you google for "mathematica convex hull"? Did you open the documentation center and type in "convex hull"? $\endgroup$ – Szabolcs Feb 22 '17 at 9:38
4
$\begingroup$
ConvexHullMesh[
   {{4, 0, 0}, {2, 0, 4}, {0, 1, 6}, {0, 0, 10}, {0, 4, 0}}
              ]

enter image description here

Your Convex Hull comprises precisely the points you provided.

data = {{4, 0, 0}, {2, 0, 4}, {0, 1, 6}, {0, 0, 10}, {0, 4, 0}};
Show[
 ConvexHullMesh[data,
  ViewPoint -> {.5, -2, -1}],
 Graphics3D[{Red, PointSize[0.06], Point[data]}]
 ]

enter image description here

$\endgroup$
  • $\begingroup$ Is there better way to see inside the convex hull $\endgroup$ – Ateq Alsaadi Feb 22 '17 at 2:45
  • $\begingroup$ Run the code and rotate the figure by yourself. $\endgroup$ – David G. Stork Feb 22 '17 at 2:46
  • $\begingroup$ I don't know why you would want to see inside, but try this: Show[ConvexHullMesh[data, MeshCellStyle -> {{2, All} -> Opacity[0.5, Orange]}], Graphics3D[Point[data]]] $\endgroup$ – David G. Stork Feb 22 '17 at 2:55
  • $\begingroup$ Thanks I really got what I want :) $\endgroup$ – Ateq Alsaadi Feb 22 '17 at 3:10
  • $\begingroup$ Is there a way to see xyz coordinates? $\endgroup$ – Ateq Alsaadi Feb 22 '17 at 3:47

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