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, Commented Nov 14, 2016 at 17:53
@JoshBishop 3-dimension sphere is a surface of ball but not solid — yode, Commented Nov 14, 2016 at 18:26
Can someone please write and explain the code for the above 3-sphere? — Dilaton, Commented Nov 22, 2017 at 18:24

yode · Accepted Answer · 2017-09-16 18:18:17Z

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, 2017 at 18:18

yode

27.2k4 gold badges66 silver badges174 bronze badges

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

Add a comment |

1 Answer 1