The visual art or other aesthetic results generated by Mathematica.

learn more… | top users | synonyms

14
votes
4answers
967 views

Generate a certain colorful triangle

I want to get a colorful triangle like this: I hope to get a triangle with any number of layers. This is my current method. Actually, I'm not very content with these graph theory functions, since ...
10
votes
2answers
562 views

Reproducing the xkcd “Self-Description” comic

Trying to brush up on my programming, I wanted to see if I can reproduce at least the first two panels of the following comic in Mathematica: I have some code for trying to reproduce the first ...
27
votes
4answers
3k views

How can Mathematica be used to create images like these?

Here are two examples of artistic image interpolation using just black lines: TRIANGULATION: ANGULAR CELEBRITIES DRAWN WITH A PEN Interpolation for Triangulation-represented Digital Image The ...
-1
votes
2answers
332 views

Make a fractal-like dot animation

How to make an animation of following fractal-like gif by using Mathematica?
20
votes
1answer
3k views

How to create a fascinating QR code like this?

Check the facinating QRCode in my profile page here You can find that this QRCode is some sort of intriguing as the QRCode is a IMAGE ITSELF!!! So my question is, how to create such a QRCode ...
519
votes
6answers
170k views

xkcd-style graphs

I received an email to which I wanted to respond with a xkcd-style graph, but I couldn't manage it. Everything I drew looked perfect, and I don't have enough command over ...
253
votes
6answers
119k 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 ...
13
votes
2answers
411 views

Disconnected Frame/Axes in Plots

Is it possible to have "Tufte" style figure axes? That is so that the axes do not need to connect or span the entire data range? For an example of what I mean from the R's default histogram style: ...
49
votes
3answers
2k views

Composition à la Mondrian

I would like to paint something like this or,even better, like this I have tried ...
11
votes
1answer
170 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. ...
51
votes
6answers
6k 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 ...
70
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. ...
104
votes
7answers
9k 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 ...
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: ...
45
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
88 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 ...
51
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
127
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
384 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
374 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 ...
82
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
303 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
393 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
150 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
283 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
291 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
288 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 ...
38
votes
5answers
4k 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
4k 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 ...
1
vote
1answer
109 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) ...
31
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: ...
24
votes
2answers
2k 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 ...
14
votes
1answer
463 views
13
votes
2answers
838 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: ...
56
votes
1answer
2k views

DumpsterDoofus's captivating generative art

How can I render these beautiful images that DumpsterDoofus posted?
12
votes
3answers
315 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
434 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): ...
45
votes
5answers
10k 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 ...
45
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
283 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
523 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 ...