3
$\begingroup$

I'm still a newbie in Mathematica. I want to draw a beam of radius of the sphere in $\mathbb{R}^3$ without the surface appearing (look at the attached image). I would like so many to appear that the drawing looks dense but not so many that they overlap too much. Thanks for your help.

enter image description here

Improve this question
$\endgroup$
3
  • $\begingroup$ Please post some Mathematica code and some pictures to descript what you want. $\endgroup$ Commented Oct 28, 2022 at 7:40
  • $\begingroup$ I just added an image @cvgmt $\endgroup$ Commented Oct 28, 2022 at 7:50
  • $\begingroup$ Similar perhaps to 219943. $\endgroup$ Commented Oct 28, 2022 at 9:14

2 Answers 2

Reset to default
7
$\begingroup$

Similar to what Ulrich Neumann wrote:

With[{n = 1000, r = 0.01}, Graphics3D[{MaterialShading["Copper"], Cone[{#, {0, 0, 0}}, r] & /@ SpherePoints[n]}, Background -> Black, Boxed -> False]]

To go further you'd need proper ray tracing. For example, export as POV and run through POV-Ray.

enter image description here

Improve this answer
$\endgroup$
5
$\begingroup$

Try SpherePoints[...]

pts = SpherePoints[200]; Graphics3D [{Orange, Line[Map[{{0, 0, 0}, #} &, pts]]},Boxed -> False]

enter image description here

Improve this answer
$\endgroup$

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.