New answers tagged

5

Second try Now with better spacing for the axis lines. Based on the comments I think this may work for you. imgs = Table[RandomImage[1, {50, 50}], {i, 4}, {j, 7}]; imgs = Transpose @ imgs; Graphics[ MapIndexed[Inset[Rasterize@#, #2] &, imgs, {2}] , PlotRange -> Thread[{1/4, 2/3 + Dimensions @ imgs}] , Axes -> True , Ticks -> Range @ ...


1

You can also use Labeled and Overlay as follows (using @Jack's example): img = ImageResize[#, {100, 100}] & /@ ExampleData /@ ExampleData["TestImage"][[;; 8]]; img2 = MapAt[Overlay[{#, Style["*", 40, Red]}, Alignment -> Right] &, img, {{1}, {3}, {5}, {6}, {8}}]; Grid[Partition[MapIndexed[Labeled[#, Style[First@#2, 16], {{Top, Right}}] &, ...


2

The strategy will be to make a Column that consists of the number at the right with the image below. First I make some fake image data (this will not be of interest to you). images = Map[ExampleData[#] &, ExampleData["TestImage"][[1 ;; 8]]]; images = Map[Function[img, ImageTransformation[img, # &, 64]], images]; Now using the list of eight ...



Top 50 recent answers are included