What's wrong with this small code?

*To*: mathgroup at smc.vnet.net*Subject*: [mg49928] What's wrong with this small code?*From*: jianchaoyao at hotmail.com (Justin)*Date*: Fri, 6 Aug 2004 03:09:52 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

I made a 4*4 IdentityMatrix, named "test". Then, I wanna show the diagnol "1" in RED. After running the following code, I got the red diagnol opposite to the "1" diagnol. What's wrong with this code? Can anybody find it out? Thanks. test = IdentityMatrix[4]; {numRows, numColumns} = Dimensions[test]; Show[ Graphics[ RasterArray[ Table[ If[ test[[i, j]] > 0, RGBColor[1, 0, 0], RGBColor[0, 1, 0] ], {i, 1, numRows}, {j, 1, numColumns} ] ] ] ]

**Follow-Ups**:**Re: What's wrong with this small code?***From:*Omega Consulting <info@omegaconsultinggroup.com>