MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: affine transformation to rasters

  • To: mathgroup at
  • Subject: [mg83055] Re: affine transformation to rasters
  • From: Jens-Peer Kuska <kuska at>
  • Date: Fri, 9 Nov 2007 05:10:10 -0500 (EST)
  • Organization: Uni Leipzig
  • References: <fguqhg$pi7$>
  • Reply-to: kuska at


that is nonsens, try

    AffineTransform[{RandomReal[{1, 6}] {{-0.139, 0.263}, {0.246,
         0.224}}, {RandomReal[{-100, 100}],
       RandomReal[{-100, 100}]}}]], {6}]]

and you will see, that the images are translated and scaled.

But in a single image you will not see the translation/ scaling
because Mathematica will ajust the PlotRange (translation) and the
image size (scaling).


juan flores wrote:
> Hi all,
> I am working on fractals through IFS (Iterated Function Systems).  An
> IFS ca be defined as a set of affine transformations that are
> iteratively applied to an initial image.  All examples in the Wolfram
> Demonstrations Project do IFSs with polygons.  When you apply an
> affine transformation to a raster image, you get the rotations,
> reflections, and shearings right, but not the translations nor the
> scalings.
> I am reading a jpg file with import, extracting the raster from it,
> and applying an affine transformation.
> oce = Import["ExampleData/ocelot.jpg"];
> oceras = oce[[1]];
> Graphics[GeometricTransformation[oceras,
>   AffineTransform[{{{-0.139, 0.263},
>                             {0.246, 0.224}},
>                            {0.57, -0.036}}]]]
> In this case, the affine transformation is a composition of
> translation, rotation, reflection, and shearing.
> Any ideas on how to proceed?  Any tricks?
> Regards,
> Juan Flores
> Universidad Michoacana
> Mexico

  • Prev by Date: Re: Can you get a package back to a notebook easily?
  • Next by Date: Re: machine precision number plot fixed in V6?
  • Previous by thread: affine transformation to rasters
  • Next by thread: Re: affine transformation to rasters