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

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.

### Update:

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
• is there a reason you need a solid in image form? – Josh Bishop Nov 14 '16 at 19:24
• Can someone please write and explain the code for the above 3-sphere? – Dilaton Nov 22 '17 at 18:24

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