The Mathematica Journal
Departments
Download This Issue
Home
Feature Articles
Graphics Gallery
Tricks of the Trade
In and Out
Columns
The Mathematica Programmer
New Products
New Publications
Classifieds
Calendar
News Bulletins
Editor's Pick
Mailbox
Letters
Write Us
About the Journal
Staff and Contributors
Submissions
Subscriptions
Advertising
Back Issues

Forward--Into The Past

[Graphics:../Images/index_gr_1.gif]

For my first foray into the world of Artlandia, I thought I'd experiment with some early algorithmic art made by a former professor/adviser and eventual colleague of mine, Bill Kolomyjec. The bulk of his early work during the early 1970's was done at Michigan State University using BASIC programs on a then state-of-the-art PDP-11 connected to a plotter. Here's one of my favorite pieces, Boxes I.

[Graphics:../Images/index_gr_2.gif]

Boxes I - Bill Kolomyjec, 1973

The nucleus of this work is a grid system, making it a good candidate for experimentation with Artlandia. The following code shows the simple lattice from which Boxes I was created. The Artlandia function Tile contains a set of graphics primitives and a tiling group that tells Artlandia how the graphics primitives are arranged into wallpaper patterns. In this example we are using a [Graphics:../Images/index_gr_3.gif] tiling group, which is essentially a rectangular grid system. The Tiling command creates a set of graphics primitives that can be rendered with Show.

[Graphics:../Images/index_gr_4.gif]

[Graphics:../Images/index_gr_5.gif]

In that particular work each square is rotated and translated by an amount proportional to its distance from the edge of the grid. Conveniently, Artlandia contains a full set of geometry manipulation utilities. Here we create a function for manipulating the square, BoogieWoogie, that uses the Rotate and Translate functions to randomly displace the graphics primitives by some amount.

[Graphics:../Images/index_gr_6.gif]

This snippet of programming calculates scaled city-block distances from the edges of the lattice on the interval [0,1]. The resulting distance is scaled by an adjustable exponential falloff to make the effect more pronounced or limited.

[Graphics:../Images/index_gr_7.gif]

Putting it all together, we can create a matrix of tiles, each tile displaced and rotated by an amount proportional to its city-block distance from the edge of the figure.

[Graphics:../Images/index_gr_8.gif]

[Graphics:../Images/index_gr_9.gif]

Voila! Crank up your plotter and take a giant step back into the world of '70s computer art.

One nice feature of Artlandia is that there is more than one way to do most anything (as is traditional with Mathematica).  Some designs lend themselves more readily to methods other than that used above. For example, the Lattice command could have been used to create the grid and a tile could have been constructed and drawn at each point in it, rather than depending on Tiling. However, Tiling allows us to experiment with more variations on Kolomyjec's theme.

[Graphics:../Images/index_gr_10.gif]

[Graphics:../Images/index_gr_11.gif]

[Graphics:../Images/index_gr_12.gif]

[Graphics:../Images/index_gr_13.gif]

[Graphics:../Images/index_gr_14.gif]

[Graphics:../Images/index_gr_15.gif]


Converted by Mathematica      September 24, 1999

[Prev Page][Next Page]