Why might I find artistic images with Mathematica source code?

I’m most interested in 3D graphics of scatterplots and surfaces where I can view and edit the source code in Mathematica.
Please direct me to any source you might be aware of- thanks!

Some pages to look at in no particular order: