Hcfyk

Real-world applications of fields, rings and groups in linear algebra.

How did Captain America manage to do this?

What happened to Captain America in Endgame?

Is it idiomatic to construct against `this`?

How to creep the reader out with what seems like a normal person?

What's the polite way to say "I need to urinate"?

How would one muzzle a full grown polar bear in the 13th century?

Why was Germany not as successful as other Europeans in establishing overseas colonies?

How does a program know if stdout is connected to a terminal or a pipe?

Why do games have consumables?

Is there a way to get a compiler for the original B programming language?

Phrase for the opposite of "foolproof"

Why must Chinese maps be obfuscated?

What term is being referred to with "reflected-sound-of-underground-spirits"?

Which big number is bigger?

The Defining Moment

How can Republicans who favour free markets, consistently express anger when they don't like the outcome of that choice?

Contradiction proof for inequality of P and NP?

what is the sudo password for a --disabled-password user

Map of water taps to fill bottles

Was there a Viking Exchange as well as a Columbian one?

In order to check if a field is required or not, is the result of isNillable method sufficient?

Do I have an "anti-research" personality?

What does the "ep" capability means?

How to get regions to plot as graphics

How to get 2D graphics into 3D without background?Restrict MousePosition to specific Graphics objectCan't plot rotated regionOpacity function applied to Graphics ObjectsHow to make Inset graphics maintain relative sizes when combinedHow to apply a color gradient to a Rectangle primitive?How to plot the difference between two regions?Zoom into RegionPlot of a region made with RegionDifference/RegionUnionWhy this “is not a correctly specified region”?FacialFeatures is not a Graphics primitive or directive

3

$begingroup$

I want to put an anulus in my graphics object. How can I format a region difference into a graphics primitive?

a=1;b=5;
Region[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (*works*)
Graphics[Rectangle[5,5], Blue,Rectangle[-5,-5],RegionDifference[Disk[0,0,b],Disk[0,0,a]]](*doesn't work*)
Head[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (* wrong object type *)
Head[Disk[]]

graphics regions

share|improve this question

asked Mar 29 at 0:11

Ion SmeIon Sme

877

$endgroup$

• 
  
  
  

  
  4
  

  
  
  
  
  
  

  
  $begingroup$
  Why not use Annulus?
  $endgroup$
  – Carl Woll
  Mar 29 at 0:19
  

  
  
  
  

add a comment | 

3

$begingroup$

I want to put an anulus in my graphics object. How can I format a region difference into a graphics primitive?

a=1;b=5;
Region[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (*works*)
Graphics[Rectangle[5,5], Blue,Rectangle[-5,-5],RegionDifference[Disk[0,0,b],Disk[0,0,a]]](*doesn't work*)
Head[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (* wrong object type *)
Head[Disk[]]

graphics regions

share|improve this question

asked Mar 29 at 0:11

Ion SmeIon Sme

877

$endgroup$

• 
  
  
  

  
  4
  

  
  
  
  
  
  

  
  $begingroup$
  Why not use Annulus?
  $endgroup$
  – Carl Woll
  Mar 29 at 0:19
  

  
  
  
  

add a comment | 

$begingroup$

I want to put an anulus in my graphics object. How can I format a region difference into a graphics primitive?

a=1;b=5;
Region[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (*works*)
Graphics[Rectangle[5,5], Blue,Rectangle[-5,-5],RegionDifference[Disk[0,0,b],Disk[0,0,a]]](*doesn't work*)
Head[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (* wrong object type *)
Head[Disk[]]

graphics regions

share|improve this question

asked Mar 29 at 0:11

Ion SmeIon Sme

877

$endgroup$

a=1;b=5;
Region[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (*works*)
Graphics[Rectangle[5,5], Blue,Rectangle[-5,-5],RegionDifference[Disk[0,0,b],Disk[0,0,a]]](*doesn't work*)
Head[RegionDifference[Disk[0,0,b],Disk[0,0,a]]] (* wrong object type *)
Head[Disk[]]

share|improve this question

asked Mar 29 at 0:11

Ion SmeIon Sme

877

share|improve this question

asked Mar 29 at 0:11

Ion SmeIon Sme

877

asked Mar 29 at 0:11

Ion SmeIon Sme

877

asked Mar 29 at 0:11

Ion SmeIon Sme

877

3 Answers
3

active

oldest

votes

3

$begingroup$

Graphics[Rectangle[5, 5], Blue, Rectangle[-5, -5], 
 First @ RegionPlot @ RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]

share|improve this answer

answered Mar 29 at 0:16

kglrkglr

190k10209427

$endgroup$

add a comment | 

4

$begingroup$

a = 1; b = 5;
Show[Graphics[Blue, Rectangle[4, 4], Red, Rectangle[-5, -5]], 
Region[RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]]

share|improve this answer

answered Mar 29 at 0:45

mjwmjw

1,33910

$endgroup$

add a comment | 

2

$begingroup$

Graphics[Annulus[0, 0, .5, 1]]

(* Oh... just saw @Carl Woll's equivalent solution *)

share|improve this answer

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

$endgroup$

add a comment | 

Your Answer

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "387"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194147%2fhow-to-get-regions-to-plot-as-graphics%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

3

$begingroup$

Graphics[Rectangle[5, 5], Blue, Rectangle[-5, -5], 
 First @ RegionPlot @ RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]

share|improve this answer

answered Mar 29 at 0:16

kglrkglr

190k10209427

$endgroup$

add a comment | 

3

$begingroup$

Graphics[Rectangle[5, 5], Blue, Rectangle[-5, -5], 
 First @ RegionPlot @ RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]

share|improve this answer

answered Mar 29 at 0:16

kglrkglr

190k10209427

$endgroup$

add a comment | 

$begingroup$

Graphics[Rectangle[5, 5], Blue, Rectangle[-5, -5], 
 First @ RegionPlot @ RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]

share|improve this answer

answered Mar 29 at 0:16

kglrkglr

190k10209427

$endgroup$

Graphics[Rectangle[5, 5], Blue, Rectangle[-5, -5], 
 First @ RegionPlot @ RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]

share|improve this answer

answered Mar 29 at 0:16

kglrkglr

190k10209427

answered Mar 29 at 0:16

kglrkglr

190k10209427

answered Mar 29 at 0:16

kglrkglr

190k10209427

4

$begingroup$

a = 1; b = 5;
Show[Graphics[Blue, Rectangle[4, 4], Red, Rectangle[-5, -5]], 
Region[RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]]

share|improve this answer

answered Mar 29 at 0:45

mjwmjw

1,33910

$endgroup$

add a comment | 

4

$begingroup$

a = 1; b = 5;
Show[Graphics[Blue, Rectangle[4, 4], Red, Rectangle[-5, -5]], 
Region[RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]]

share|improve this answer

answered Mar 29 at 0:45

mjwmjw

1,33910

$endgroup$

add a comment | 

$begingroup$

a = 1; b = 5;
Show[Graphics[Blue, Rectangle[4, 4], Red, Rectangle[-5, -5]], 
Region[RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]]

share|improve this answer

answered Mar 29 at 0:45

mjwmjw

1,33910

$endgroup$

a = 1; b = 5;
Show[Graphics[Blue, Rectangle[4, 4], Red, Rectangle[-5, -5]], 
Region[RegionDifference[Disk[0, 0, b], Disk[0, 0, a]]]]

share|improve this answer

answered Mar 29 at 0:45

mjwmjw

1,33910

answered Mar 29 at 0:45

mjwmjw

1,33910

answered Mar 29 at 0:45

mjwmjw

1,33910

2

$begingroup$

Graphics[Annulus[0, 0, .5, 1]]

(* Oh... just saw @Carl Woll's equivalent solution *)

share|improve this answer

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

$endgroup$

add a comment | 

2

$begingroup$

Graphics[Annulus[0, 0, .5, 1]]

(* Oh... just saw @Carl Woll's equivalent solution *)

share|improve this answer

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

$endgroup$

add a comment | 

$begingroup$

Graphics[Annulus[0, 0, .5, 1]]

(* Oh... just saw @Carl Woll's equivalent solution *)

share|improve this answer

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

$endgroup$

Graphics[Annulus[0, 0, .5, 1]]

share|improve this answer

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155

answered Mar 29 at 0:23

David G. StorkDavid G. Stork

25k22155