Plot a data of four dimension

I have a confusion recently about the visualization of data.the data you can get here.The construction of data is four dimension,like as {x,y,z,color},this is my current solution.

data = ReadList["2.txt", {Real, Real, Real, Real}];
front = data[[All, 1 ;; 3]];
back = data[[All, 4]];
Graphics3D[Point[front, VertexColors -> Hue /@ Rescale[back]]]


the effect like the picture.

it is not my intention.i want get a cube whose color be determined by the fourth element of the list.

I have an another try like this.

Style[ConvexHullMesh[front]]


the shape is contented to me.But I cannot render it by what I want to.Can anybody help me?

• Something like: 19575? – Kuba Apr 25 '15 at 13:48
• @Kuba,yeah,thk your concern this problem.I have read that some times,but there are two difference,first,the first solution's point is not a face.the scene is same to my first picture. the scond solution 's data isn't a coordinates.so i want to get a new method. – yode Apr 25 '15 at 14:01
• and all my data is the surface of a cube. – yode Apr 26 '15 at 3:47

Graphics3D[{EdgeForm[{}],

• MeshCoordinates[front][[1]] is equivalent to front. – LLlAMnYP Apr 27 '15 at 12:45
• @LLlAMnYP Hi, thanks for pointing out that, that might be a typo here though the same to front, my first try is MeshCoordinates[DelaunayMesh[front]] – HyperGroups Apr 27 '15 at 13:14
• Also with some fiddling it seems that VertexColors->Hue/@(Rescale@back)yield a more meaningful picture. – LLlAMnYP Apr 27 '15 at 13:27