How can I change the default color of the basic geometric regions in 2D?

Question

I like to use the basic geometric regions in Mathematica, like Parallelogram[...], Rectangle[...], Circle[...], but I don't like the default solid black color that Mathematica uses when I show the 2D-regions with Graphics[Triangle[]].

I like the color for the 3D-regions (light brown/orange), is there a way to use this (or another) color as the default color to the 2D regions?

Welcome to Mathematica.SE! I hope you will become a regular contributor. To get started, 1) take the introductory [tour] now, 2) when you see good questions and answers, vote them up by clicking the gray triangles, because the credibility of the system is based on the reputation gained by users sharing their knowledge, 3) remember to accept the answer, if any, that solves your problem, by clicking the checkmark sign, and 4) give help too, by answering questions in your areas of expertise. — bbgodfrey, Jun 04 '21 at 16:16
Note that the color of Graphics3D[{Cone[]}] is white that is shaded according to the Lighting. (See FrontFaceColor /. CurrentValue[{StyleDefinitions, "Graphics3D"}] and compare with FrontFaceColor /. CurrentValue[{StyleDefinitions, "Graphics"}]. There is also BackFaceColor.) — Michael E2, Jun 04 '21 at 19:38

bbgodfrey · Accepted Answer · 2021-06-04T15:40:07.853

1

To set the 2d graphics default (here, to Red), use

SetOptions[Graphics, BaseStyle -> Red];

Then,

Graphics[Triangle[]]

Subsequent commands, like Graphics[Circle[]], also yield Red images by default. Many other default options also can be set in the same way. Remove the ; from the first command to see them.

On the other hand, if you wish this default to persist across Notebooks, you must edit aStyleSheet, along the lines of my answer to 246885

edited Jun 04 '21 at 15:40

answered Jun 04 '21 at 15:33

bbgodfrey

61,439
17
89
156

3

You could also use SetOptions[Graphics, BaseStyle -> {"PolygonBoxOptions" -> {BaseStyle -> {Red}}}] for a more targeted approach. – Carl Woll Jun 04 '21 at 16:08

Jagra · Answer 2 · 2021-06-04T13:31:11.793

See Graphics:

Example follows giving a number of ways to set the color (not certain one can set the "Default" color, but someone else may comment):

Graphics[{#, Triangle[]}] & /@ {
  CMYKColor[1, 0, 1, 0, .5],
  CMYKColor[0.3, 1, 0, .25],
  Lighter[CMYKColor[0, 0, 1, 0], .4],
  CMYKColor[0, 0, 1, 0],
  Darker[CMYKColor[0, 0, 1, 0], .4],
  RGBColor[1, 0, 0],
  Blend[{RGBColor[1, 0, 0], RGBColor[0, 0, 1]}],
  RGBColor[0, 0, 1],
  Hue[0.25, 1, 1, .5],
  Hue[0.5, 1, 1, .5]
  }

You can also do things like the following:

Graphics[{
   CMYKColor[1, 0, 1, 0, .5], 
   PatternFilling["Checkerboard"],
   Triangle[]}]

How can I change the default color of the basic geometric regions in 2D?

2 Answers2