Within a For statement as I am making an animated gif, I have some numbers that I would like to print on the images. Is there a way to do that?
SetDirectory[NotebookDirectory[]]; im = Import["ExampleData/lena.tif"]; {x, y} = ImageDimensions[im]; data = Show[im, Graphics[Text[Style[ToString[#], Red, 50], {Round[x/2], Round[y/2]}]]] & /@ Range[1, 10]; Export["im.gif", data]