0
$\begingroup$

Here is a nice figure

enter image description here

Now let's create a grid

plot = Show[GraphicsGrid[{{im1, im1, im1}, 
            {SpanFromLeft, im1, im1}, 
            {SpanFromLeft, SpanFromLeft, im1}}, Spacings -> 0]]

which produces

enter image description here

As you can see, three dots (...) appear at the empty slots of the grids.

My question: Is there a way to remove these dots?

Many thanks in advance!

$\endgroup$
3
$\begingroup$

In:

im1 = Import["https://i.stack.imgur.com/e6Kuf.jpg"];
UpperTriangularize@Array[1 &, {3, 3}] /. {1 -> im1, 0 -> ""} // GraphicsGrid

Out:

Mathematica graphics

Thanks to Kuba && J. M.. I didn't know I could use "" instead of a white rectangle. And J. M.'s method is more compact.

$\endgroup$
  • 1
    $\begingroup$ blank = "" will be enough. $\endgroup$ – Kuba May 19 '17 at 8:11
  • 2
    $\begingroup$ As Kuba says, "" suffices. Here's a compact version: GraphicsGrid[PadLeft[{{im1, im1, im1}, {im1, im1}, {im1}}, Automatic, ""]] $\endgroup$ – J. M. will be back soon May 19 '17 at 8:12
3
$\begingroup$

You can just use Null instead of SpanFromLeft:

im1=Graphics[Disk[]];

plot = Show[GraphicsGrid[{{im1, im1, im1}, 
        {Null, im1, im1}, 
        {Null, Null, im1}}, Spacings -> 0]]

This will produce no dots.

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.