Skip to main content
added 18 characters in body
Source Link
Sjoerd C. de Vries
  • 66.1k
  • 15
  • 189
  • 327

You don't know the graphics size? Well set it then at the size you want it to be using ImageSize:

imageSize = 200;
headSize = 30;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {2, 1}}]}, 
  ImageSize -> imageSize]

Mathematica graphics

imageSize = 200;
headSize = 200;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {1, 0}}]}, 
  ImageSize -> imageSize,Background->LightYellow]

Mathematica graphics

You don't know the graphics size? Well set it then at the size you want it to be:

imageSize = 200;
headSize = 30;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {2, 1}}]}, 
  ImageSize -> imageSize]

Mathematica graphics

imageSize = 200;
headSize = 200;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {1, 0}}]}, 
  ImageSize -> imageSize,Background->LightYellow]

Mathematica graphics

You don't know the graphics size? Well set it then at the size you want it to be using ImageSize:

imageSize = 200;
headSize = 30;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {2, 1}}]}, 
  ImageSize -> imageSize]

Mathematica graphics

imageSize = 200;
headSize = 200;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {1, 0}}]}, 
  ImageSize -> imageSize,Background->LightYellow]

Mathematica graphics

Source Link
Sjoerd C. de Vries
  • 66.1k
  • 15
  • 189
  • 327

You don't know the graphics size? Well set it then at the size you want it to be:

imageSize = 200;
headSize = 30;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {2, 1}}]}, 
  ImageSize -> imageSize]

Mathematica graphics

imageSize = 200;
headSize = 200;
Graphics[{Arrowheads[headSize/imageSize], Arrow[{{0, 0}, {1, 0}}]}, 
  ImageSize -> imageSize,Background->LightYellow]

Mathematica graphics