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$

2 Answers 2

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$
2
  • 1
    $\begingroup$ blank = "" will be enough. $\endgroup$
    – Kuba
    May 19, 2017 at 8:11
  • 2
    $\begingroup$ As Kuba says, "" suffices. Here's a compact version: GraphicsGrid[PadLeft[{{im1, im1, im1}, {im1, im1}, {im1}}, Automatic, ""]] $\endgroup$ May 19, 2017 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 and acknowledge that you have read and understand our privacy policy and code of conduct.

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