Mathematica Tutorial: Visualization And Graphics - Wolfram Research

Visualization and Graphics 37
InputForm shows the complete graphics object.
In[9]:=
InputForm@%D
Out[9]//InputForm= Graphics[Polygon[{{1., 0.}, {0.8090169943749475,
0.5877852522924731}, {0.30901699437494745,
0.9510565162951535}, {-0.30901699437494745,
0.9510565162951535}, {-0.8090169943749475,
0.5877852522924731}, {-1., 0.}}]]
In[10]:=
This takes the graphics primitive created above, and adds the graphics directives RGBColor
and EdgeForm.
Graphics@8RGBColor@0.3, 0.5, 1D, EdgeForm@Thickness@0.01DD, poly TrueD
0.8
0.6
Out[11]=
0.4
0.2
0.0
-1.0 -0.5 0.0 0.5 1.0
InputForm shows that the option was introduced into the resulting Graphics object.
In[12]:=
InputForm@%D
Out[12]//InputForm= Graphics[{RGBColor[0.3, 0.5, 1],
EdgeForm[Thickness[0.01]],
Polygon[{{1., 0.}, {0.8090169943749475,
0.5877852522924731}, {0.30901699437494745,
0.9510565162951535}, {-0.30901699437494745,
0.9510565162951535}, {-0.8090169943749475,
0.5877852522924731}, {-1., 0.}}]}, {Frame -> True}]