New in Wolfram Mathematica 6: Automated Computational Aesthetics  previous | next 
Context-Sensitive Graphics Sizing
Mathematica 6 automatically resizes and aligns graphics to be appropriate for their environments.
In[1]:=

Click for copyable input
With[{g = PolyhedronData["Icosahedron"]}, {g, f[g, g]}]
Out[1]=