How to draw a 3-dimensional sphere whose Head is Image3D?

Question

In 2 dimensions, I can do like this to draw my image:

Image[Graphics[{Circle[]}]]

But in 3 dimensions, this method will give an error information:

So I try another array method:

Image[Thinning[Unitize[EntropyFilter[ArrayPad[DiskMatrix[{10, 10}], 1], 1]]]]

This is good method in 2 dimensions. But the function Thinning cannot be used in 3 dimensions. So I don't know how to draw a 3D sphere still.

It seem the

EdgeDetect[Image3D[ArrayPad[DiskMatrix[{40, 40, 40}], 1]]]

is close to what I want.But this method is costing memory very much and the surface'sthickness seem to be not very uniform.

It seems that just Image3D[DiskMatrix[{100, 100, 100}]] works, but I'm curious why the interplay between Image and Graphics works, while the interplay between Image3D and Graphics3D does not.... — Josh Bishop, Nov 14 '16 at 17:53
@JoshBishop 3-dimension sphere is a surface of ball but not solid — yode, Nov 14 '16 at 18:26
Can someone please write and explain the code for the above 3-sphere? — Dilaton, Nov 22 '17 at 18:24

score 7 · Accepted Answer · answered Sep 16 '17 at 18:18

7

If we are in 11.2,the RegionImage can help us to implement it

RegionImage[Sphere[]]

It is what I want exactly.

answered Sep 16 '17 at 18:18

yode

Those Moiré patterns are attractive, or distracting, depending on your point of view. – J. M.'s missing motivation Sep 16 '17 at 23:52
@J.M. I wonder where they come from. It'd be interesting to know if it's an issue of meshing or rendering. – b3m2a1 Nov 22 '17 at 19:31

1 Answers1