New in Wolfram Mathematica 7: Built-in Image Processing & Analysis ◄ previous | next ►
Process Different Parts of an Image Differently
This combines matrix and image operations to create a composite image.
In[1]:=

Click for copyable input
In[2]:=

Click for copyable input
s = Blur[imag, 4];
In[3]:=

Click for copyable input
g = GradientFilter[imag, 2] // ImageAdjust;
In[4]:=

Click for copyable input
ds = UpperTriangularize[#, 120] & /@ 

  ImageData[s, Interleaving -> False]; dg = 

 LowerTriangularize[#, -120] & /@ ImageData[g, Interleaving -> False];

dh = UpperTriangularize[#, -119] & /@ (LowerTriangularize[#, 119] & /@

      ImageData[imag, Interleaving -> False]);
In[5]:=

Click for copyable input
Image[ds + dg + dh,  Interleaving -> False]
Out[5]=