2
$\begingroup$

I´m trying to obtain the convex hull (with transparent faces) of a small number of points. I would like the Plot to have

  • the points shown with small spheres
  • numbers 1, 2, 3, ... along the axes

Here is what I have tried.

p = {{2, 1, 6}, {4, 3, 0}, {5, 2, 5}, {3, 5, 4}}
ListPointPlot3D[p, PlotStyle -> {Red, "Sphere", Large}, 
  PlotRange -> {{0, 6}, {0, 6}, {0, 6}}, AxesLabel -> Automatic]

Could you help me.

$\endgroup$
  • 1
    $\begingroup$ In V10 you could use ConvexHullMesh to generate the hull and then HighlighMesh for the styling. $\endgroup$ – user21 Jul 21 '14 at 9:55
  • $\begingroup$ @user21 but... is available the version 10 of Mathematica?. I see the web and I can see mathematica v9 but not v10 wolfram.com/mathematica $\endgroup$ – Mika Ike Jul 21 '14 at 10:03
  • 1
    $\begingroup$ @MikaIke "Mathematica 10 Just Released! See What's New »" $\endgroup$ – Öskå Jul 21 '14 at 10:04
3
$\begingroup$

In Version 10, we can compute the convex hull using ConvexHullMesh

p = {{2, 1, 6}, {4, 3, 0}, {5, 2, 5}, {3, 5, 4}}

chull = ConvexHullMesh[p]

Mathematica graphics

Which we can style using HighlightMesh

Show[HighlightMesh[chull, Labeled[1, "Index"]], Graphics3D[{Red, Sphere[p, 0.1]}]]

Mathematica graphics

$\endgroup$
  • $\begingroup$ ok. Only 1 question. Do you know how to view the 3 axis and the numers in the axis 1,2,3,4,... ? $\endgroup$ – Mika Ike Jul 22 '14 at 7:08
  • $\begingroup$ @MikaIke, what do you mean by axis? $\endgroup$ – RunnyKine Jul 22 '14 at 7:16
  • 1
    $\begingroup$ @MikaIke Add , Axes -> True, Boxed -> True into Show. $\endgroup$ – Alexey Popkov Jul 22 '14 at 9:40

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

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