The visual art or other aesthetic results generated by Mathematica.

learn more… | top users | synonyms

1
vote
1answer
208 views

Make a fractal-like dot animation

How to make an animation of following fractal-like gif by using Mathematica?
67
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. ...
7
votes
1answer
111 views

Left Right Straight Maze

How do I generate a Left, Right and Straight ordering for a maze for something like the following? Similar to generating a left and right ordering for someone walking in real life. ...
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: ...
23
votes
5answers
4k views

Make a beautiful Moiré effect

How do I make the following Moiré pattern? I tried: ...
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 ...
1
vote
1answer
55 views

Extra Curves When Generating From Image

Using the method in this post I'm trying to generate a curve for this image: I've gone ahead and imported it and I'm using img=Binarize[img~Blur~3] to blur it a ...
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 ...
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 ...
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
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, ...
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 ...
4
votes
2answers
381 views

Colors associated to parts of a 3D distribution of points

Suppose we have a long list of random points (in Cartesian coordinates) in 3D space. coords := ...; Until now, I was associating colors in a radial way, from the ...
16
votes
1answer
350 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: ...
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 ...
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" ...
8
votes
1answer
273 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 ...
1
vote
3answers
324 views

Random non-overlapping disks in a square

I've found a nice code snippet by @belisarius from this question, that I'll reproduce here for reference: ...
3
votes
1answer
147 views

default RGB coloring

I am playing with some basic genetic algorithms to recreate input images by transparent plane figures (similar like here:). Everything would work great but the speed is terrible. I was looking for a ...
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!
9
votes
1answer
253 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 ...
10
votes
3answers
251 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 ...
8
votes
1answer
269 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 ...
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 ...
244
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 ...
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. ...
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 ...
96
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 ...
1
vote
1answer
102 views

Adding a fading color only to 3D curves going outside a cylinder

I'm having a problem with color shades on multi curves drawn with the Mathematica 7.0 code below. All the curves with both their endpoints inside the unit cylinder (green circle on the picture below) ...
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: ...
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 ...
13
votes
1answer
436 views
13
votes
2answers
811 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: ...
52
votes
1answer
1k views

DumpsterDoofus's captivating generative art

How can I render these beautiful images that DumpsterDoofus posted?
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: ...
22
votes
1answer
412 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 ...
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): ...
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 ...
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, ...
8
votes
1answer
269 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 ...
20
votes
2answers
474 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 ...
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 ...
10
votes
4answers
426 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: ...
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 ...
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!
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 ...
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 ...
45
votes
3answers
2k views

Composition à la Mondrian

I would like to paint something like this or,even better, like this I have tried ...
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 ...