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$
3
  • 1
    $\begingroup$ In V10 you could use ConvexHullMesh to generate the hull and then HighlighMesh for the styling. $\endgroup$ Commented Jul 21, 2014 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$ Commented Jul 21, 2014 at 10:03
  • 1
    $\begingroup$ @MikaIke "Mathematica 10 Just Released! See What's New »" $\endgroup$ Commented Jul 21, 2014 at 10:04

1 Answer 1

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$
3
  • $\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$ Commented Jul 22, 2014 at 7:08
  • $\begingroup$ @MikaIke, what do you mean by axis? $\endgroup$ Commented Jul 22, 2014 at 7:16
  • 1
    $\begingroup$ @MikaIke Add , Axes -> True, Boxed -> True into Show. $\endgroup$ Commented Jul 22, 2014 at 9:40

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.