The visual art or other aesthetic results generated by Mathematica.

learn more… | top users | synonyms

243
votes
6answers
118k views

How do I draw a pair of buttocks?

I'm trying to develop a function which 3D plot would have a buttocks like shape. Several days of searching the web and a dozen my of own attempts to solve the issue have brought nothing but two ...
126
votes
4answers
18k views

How to create word clouds?

Word clouds are rather useless fancy and visually appealing plots, where words are plotted with different sizes according to their frequency in a corpus. Many applications exist out there (Wordle, ...
112
votes
7answers
20k views

How to generate a random snowflake

'Tis the season... And it's about time I posed my first question on Mathematica Stack Exchange. So, here's an holiday quest for you Graphics (and P-Chem?) gurus. What is your best code for generating ...
95
votes
6answers
8k views

Generating visually pleasing circle packs

EDIT: (my conclusion and thank you note) I want to thank you all guys for this unexpected intellectual and artistic journey. Hope you had fun and enjoyed it the same as I did. I would like to ...
78
votes
11answers
7k views

Artistic image vectorization

The question is how can we use Mathematica to create vectorized versions of low-resolution images? The goal is to get an image suitable for quality printing at any resolution. Since "true" ...
78
votes
8answers
14k views

How to make an inkblot?

How to effectively create a polygon that looks like a realistic inkblot? So far, I could come up with this (borrowing from Ed Pegg Jr.'s Rorschach demonstration): ...
66
votes
5answers
4k views

Writing a word with straight lines

Here is an interesting way to write a word: (it is from a poster for the International Museum Day 2006; I believe it even won an award at an international design competition) by Boris Ljubicic. ...
58
votes
6answers
10k views
55
votes
5answers
10k views

How to create hedcut style images?

Yesterday the hedcut style was brought up in chat. How can we create a hedcut-like style automatically in Mathematica, using a photograph as a starting point? I am looking to create a similar ...
55
votes
3answers
28k views

How to create a new “person curve”?

Wolfram|Alpha has a whole collection¹ of parametric curves that create images of famous people. To see them, enter WolframAlpha["person curve"] into a Mathematica ...
52
votes
1answer
1k views

DumpsterDoofus's captivating generative art

How can I render these beautiful images that DumpsterDoofus posted?
50
votes
4answers
5k views

Is it possible to draw this figure using Mathematica?

The figure is See the how-to video or a speeded-up GIF. I believe it should be possible to draw this figure programmatically using some Random function, but I'm ...
49
votes
1answer
2k views

Implementing a first person view of 3D objects in a scene

I've created the following scene with a Chinese-style building surrounded by trees, and a horse and a rabbit grazing on the grass in Mathematica (don't ask me why there's a bust of Beethoven in ...
47
votes
5answers
5k views

How can this image (optical illusion) be created with Mathematica?

I came across this image the other day: and liked the sensation of it pulsing. I was wondering if anyone would know how to create something similar with Mathematica (without the Pink Floyd Dark ...
45
votes
3answers
2k views

Composition à la Mondrian

I would like to paint something like this or,even better, like this I have tried ...
44
votes
5answers
9k views

How to ask Mathematica to imitate Andy Warhol's pop-art painting?

I tried to ask Mathematica to imitate Andy Warhol, let it convert a Marilyn Monroe's portrait so that it looks like Warhol's world famous pop-art painting. However, the result shown below is far from ...
44
votes
4answers
5k views

How to make the digits of π go around in a spiral like this?

Here is a start. MapIndexed[Text[Reverse[First[RealDigits[Pi,10,252]]][[Tr@#2]],#]&, Table[{t Cos[t],t Sin[t]},{t,0,16Pi,0.2}]]//Graphics
43
votes
2answers
2k views

Sketch-type graphics with transparency and dashed hidden lines?

I'd like to create transparent graphs like the following from P1095, Calculus 6th Ed, by James Stewart. Can Mathematica accomplish this? By "transparent," I mean the ability to see the interior, ...
42
votes
2answers
2k views

Generating stippled (Penrose-style) drawings of surfaces

In The Road to Reality there are plots of surfaces that use a variable density of dots to suggest curvature. You can see some examples here and here. I suppose they've been drawn by Penrose, but ...
41
votes
2answers
3k views

How to make this beautiful animation

How to make an animation of following gif in Mathematica? Edit: The animation shown above was created by Charlie Deck in processing. And how to make 3D analog? I tried first few steps ...
38
votes
5answers
3k views

Distribution of random points in 3D space to simulate the Crab Nebula

I'm generating some 3D models of planetary nebulae and supernova remnants for Celestia, a free OpenGL astronomy software. Currently, I know how to do it with random points inside a spherical shell. ...
32
votes
9answers
11k views

How to create animated snowfall?

Well, the title is self-explanatory. What sorts of snowfall can we generate using Mathematica? There are two options I suggest to consider: 1) Continuous GIF animations with smallest possible number ...
30
votes
2answers
2k views

Playing with Matrix falling code in Mathematica

I was trying to create a Matrix falling code image with Mathematica. Here is my code: ...
29
votes
3answers
2k views

Smooth Peter de Jong attractor

Today I was playing with Peter de Jong attractor. At the bottom of the page I've linked there are beautiful examples like: My attempts are not so great: It is around 10^5 points. For more than ...
27
votes
4answers
5k views

How to create effect like Van Gogh's stroke brush?

I need to apply Van Gogh's stroke brush effect to a random image Take the following image as an example: Thank you so much if you could help!
23
votes
5answers
4k views

Make a beautiful Moiré effect

How do I make the following Moiré pattern? I tried: ...
23
votes
2answers
1k views

Drawing pairs (planar graph, circle packing)

Circle packing theorem states: For every connected simple planar graph G there is a circle packing in the plane whose intersection graph is (isomorphic to) G. How to use Mathematica to draw examples ...
22
votes
7answers
2k views

Is there a way to recreate the typical Red/Blue-Postereffect using Mathematica?

I think nearly all of us have at least once seen an image like this: So I wondered whether it is possible to recreate this effect using Mathematica because it seems like it wouldn't need that many ...
22
votes
4answers
951 views

How to partition a disk into individually spaced bricks?

What I want to do is in any way produce a picture that looks like this Given a set of words, how can I partition a disk into bricks for these words, such that it looks good? Here is my sucky ...
22
votes
3answers
3k views

How to get StreamPlot to draw many hundreds of streamlines?

For artistic reasons, I want to draw an extremely dense StreamPlot with something like a thousand streamlines. I tried setting ...
22
votes
1answer
410 views

Generating animations of clouds with Mathematica

I'd like to generate some visually-pleasing animations of clouds, fog or smoke with Mathematica. My idea of "visually-pleasing" is along the lines of one of the images on the Wikipedia article for ...
21
votes
5answers
2k views

Op-art Graphic Images

This image comes from Michael Trott's Mathematica Guidebook for Programming. It's just a chapter image though, and he doesn't show the code. I was wondering what would be the best approach to ...
21
votes
3answers
840 views

Creating sculptural forms using graphics primitives

This is a question based on this answer by halirutan. Some amazing images can be created with this code, and I was wondering whether it was possible to extend the principle to different shapes. I ...
20
votes
2answers
472 views

Wind Map Artwork

I would like some help generating an image like the one seen below. The image above is an art piece called Wind Map by artists Fernanda Viégas and Martin Wattenberg. I would like to take wind ...
19
votes
3answers
1k views

Approximating an ornamental curve

How do I go about approximating this ornamental curve? Note variable thickness typical in calligraphy. Handbook and Atlas of Curves by E.V. Shikin (1995) contains many directions, including curve ...
17
votes
4answers
1k views

How to fill in an irregular border of an image

I have the following code which draws a graphic, and colors the regions in it in different colors: ...
16
votes
1answer
960 views

Animating moving surface of torus

I would like to try to recreate something similar to Paolo Čerić's torus animation: I have isolated the moving surface torus section form this Wolfram Demonstration by Kevin Sonnanburg: ...
16
votes
1answer
349 views

Creating a cloud of blocks that form I ♥ U in different viewpoints

This picture shown bellow has three shapes with different view angle (I ♥ U). How to do this type of model? A few tries: ...
15
votes
3answers
1k views

How can this type of optical illusion be created in Mathematica?

I see these around the web and would like to make them in Mathematica. Combining them in an array is actually quite mesmerizing!
13
votes
4answers
1k views

Reproduce image effect in Mathematica

How do I create the "dotifying" effect below in Mathematica? I have tried to use Rasterize first to get the image pixelated, but how do I get the disc/circle ...
13
votes
2answers
809 views

How can I create a fountain effect?

Inspired by this (please use Chrome or Firefox), I tried to simulate it, but I couldn't do it. I'm not familiar with Dynamic. Here is my simple code: ...
13
votes
1answer
434 views

How can we show the boundary of a WordCloud shape?

WordCloud can arrange the words inside a shape. ...
12
votes
3answers
299 views

Is there any faster implementation of DominantColors?

The function DominantColors is a simple function but runs incredibly slow when the number n of dominant colors to find is large - it is currently the biggest bottleneck in my code: ...
10
votes
3answers
247 views

Custom edge style (e.g. brush stroke, writing ink, etc.)

I would like to draw a graph with Mathematica in such a way that it looks like a handmade drawing or painting. To be more precise, is there a way to set a custom edge style such that it looks made ...
10
votes
4answers
424 views

Rotated Rectangles

I would like to produce an image similar to the upper half of this graphics by Victor Vasarely. All I could produce so far is this dilettante image: ...
9
votes
1answer
249 views

A method to draw a surface around a set of regularly spaced points

This is mostly an artistic endeavour. I have a 3D array of points, 1 representing a point within the surface, -1 without. The shape is not convex. I would like to produce a surface which encloses the ...
8
votes
1answer
272 views

How to add a fading trail effect in Animate?

I would like to add a smooth fading effect to the end of a curve, while it is animated. Here's a minimal working example which shows a particle moving on a circle (the circle is drawn while the ...
8
votes
1answer
2k views

How to generate a cartoon of a face

I want to use Mathematica to generate a cartoon of a face. For example, some thing like this: I think it can be done using Mathematica, but I really don't know how to do it. How can it be done, and ...
8
votes
1answer
265 views

Creating a colour variation effect of the Northern Lights

As is well known (see https://www.youtube.com/watch?v=fVsONlc3OUY ), the Northern Lights or Auroral displays appear as variations of several colours (generally pale green and pink). Is there a ...
8
votes
1answer
267 views

Aristic rendering of breaking waves from a Japanese panel

Any insight to model and render the breaking waves in the style of this - likely Japanese or possibly Korean panel? Line drawings are acceptable, not necessary to replicate all the details like ...