6
$\begingroup$

Something like this picture

enter image description here

I've tried to use ImageCollage with different weights and other conditions, but all of them arrange pictures arbitrarily. For instance

ImageCollage[{4 -> im0, 1 -> im1, 1 -> im2}, Background -> None] 

organize the images horizontally:

enter image description here

and so on.

$\endgroup$
1

2 Answers 2

4
$\begingroup$
Module[{pl, w = 500, h = 100}, pl[frac_] := Framed[ BarChart[ RandomReal[1, 5] , AspectRatio -> frac h/w , PlotTheme -> "Scientific" , ImageSize -> 0.9 {w/frac, h} ], ImageSize -> {w/frac, h}]; GraphicsGrid[ { PadRight[{pl[1]}, 4, SpanFromLeft], {pl[2], SpanFromLeft, pl[2], SpanFromLeft}, {pl[4], pl[4], pl[4], pl[4]} } , ImageSize -> {w, 4 h} , Spacings -> {0, 0} ]] 

Mathematica graphics

$\endgroup$
6
$\begingroup$
 SeedRandom@2; p = Table[BarChart[RandomReal[1, 5]], 7]; Grid[{{p[[1]], SpanFromLeft}, {p[[2]], SpanFromLeft, p[[3]], SpanFromLeft}, Join @@ {p[[4 ;; 7]]}}, Frame -> All, Alignment -> Center] 

enter image description here

$\endgroup$

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.